X-Git-Url: https://fleuret.org/cgi-bin/gitweb/gitweb.cgi?p=elisp.git;a=blobdiff_plain;f=selector.el;fp=selector.el;h=528d96dee378e177bd23b102224d848082643fd7;hp=98e806849cf245312718d95df4af3454e15b58a7;hb=5bf9b9fa31f0362f678a90b0668c5523154ef0c2;hpb=87c480726bb9ed667edb9b069b7287d8b884d460 diff --git a/selector.el b/selector.el index 98e8068..528d96d 100644 --- a/selector.el +++ b/selector.el @@ -73,7 +73,7 @@ Otherwise use the mode-line." :type 'hook :group 'selector) -(defcustom selector/quick-pick-recent-filter nil +(defcustom selector/quick-pick-recent-hide-filter nil "Regexp specifying which filenames should be hidden by `selector/quick-pick-recent'" :type 'string :group 'selector) @@ -400,7 +400,7 @@ filename." pattern-matching search implemented in `selector/select'. Without a prefix argument, hide files matching -`selector/quick-pick-recent-filter'. +`selector/quick-pick-recent-hide-filter'. With a prefix argument before the selection of the file per se, permits to edit it before opening." @@ -412,10 +412,10 @@ permits to edit it before opening." (let ((l (mapcar (lambda (s) (cons (selector/filename-to-string s) s)) - (if (and (not universal) selector/quick-pick-recent-filter) + (if (and (not universal) selector/quick-pick-recent-hide-filter) (delq nil (mapcar - (lambda (x) (and (not (string-match selector/quick-pick-recent-filter x)) x)) + (lambda (x) (and (not (string-match selector/quick-pick-recent-hide-filter x)) x)) recentf-list) ) recentf-list