- (require 'recentf)
-
- (defun ido-recentf-open ()
- "Use `ido-completing-read' to \\[find-file] a recent file"
- (interactive)
- (if (find-file (ido-completing-read "Find recent file: " recentf-list))
- (message "Opening file...")
- (message "Aborting")))
- (provide 'ido-recentf-open)
|