+ (let ((l
+ (mapcar
+ (lambda (s) (cons (selector/filename-to-string s) s))
+ (if (and (not universal) selector/quick-pick-recent-hide-filter)
+ (delq nil
+ (mapcar
+ (lambda (x) (and (not (string-match selector/quick-pick-recent-hide-filter x)) x))
+ recentf-list)
+ )
+ recentf-list
+ )
+ )
+ ))