Here is another possible implementation I use:

    (defun my-recentf-open-file-from-minibuffer (&optional arg)
       "Open a recent file from the minibuffer, with completion.
    Prompt for an item of the recentf menu, until a file is selected.
    By default, consider only the `recentf-max-menu-items' most recent
    files.  \\[universal-argument] \\[my-recentf-complete] consider all
    files.  With optional argument ARG a positive integer, consider the
    ARG most recent files."
       (interactive "P")
       (let* ((pr recentf-menu-title)
              (tb (recentf-apply-menu-filter
                   recentf-menu-filter
                   (mapcar 'recentf-make-default-menu-element
                           (cond
                            ((null arg)
                             (recentf-elements recentf-max-menu-items))
                            ((natnump arg)
                             (recentf-elements arg))
                            (recentf-list)))))
              (e (assoc (completing-read (concat pr ": ") tb nil t) tb)))
         (while (and (consp e) (consp (cdr e)))
           (setq tb (cdr e)
                 pr (concat pr "/" (car e))
                 e (assoc (completing-read (concat pr ": ") tb nil t) tb)))
         (when (and (consp e) (stringp (cdr e)))
           (funcall recentf-menu-action (cdr e)))))

Great. Why don't you add that too to the Emacs-Wiki page in the same section
("Recentf Filters (Structured Menu)"):
http://www.emacswiki.org/cgi-bin/emacs/RecentFiles.




_______________________________________________
gnu-emacs-sources mailing list
gnu-emacs-sources@gnu.org
http://lists.gnu.org/mailman/listinfo/gnu-emacs-sources

Reply via email to