summaryrefslogtreecommitdiff
path: root/lisp/ido.el
diff options
context:
space:
mode:
authorRasmus Pank Roulund <emacs@pank.eu>2015-03-12 15:02:55 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2015-03-12 15:02:55 -0400
commitac4cce624c4f51cbc57a210ade0ca74a1893d636 (patch)
tree1377df9fbdfda7a52078313d033cb1b08cce7487 /lisp/ido.el
parentfc10058a4f8a68891bd7a3508d62f03bfa5bf7ce (diff)
downloademacs-ac4cce624c4f51cbc57a210ade0ca74a1893d636.tar.gz
Fixes: debbugs:19335
* lisp/ido.el (ido-add-virtual-buffers-to-list): Include bookmark-alist files
Diffstat (limited to 'lisp/ido.el')
-rw-r--r--lisp/ido.el10
1 files changed, 8 insertions, 2 deletions
diff --git a/lisp/ido.el b/lisp/ido.el
index 1f4e3facd36..563f406aeb6 100644
--- a/lisp/ido.el
+++ b/lisp/ido.el
@@ -3480,8 +3480,14 @@ This is to make them appear as if they were \"virtual buffers\"."
;; the file which the user might thought was still open.
(unless recentf-mode (recentf-mode 1))
(setq ido-virtual-buffers nil)
- (let (name)
- (dolist (head recentf-list)
+ (let ((bookmarks (and (boundp 'bookmark-alist)
+ bookmark-alist))
+ name)
+ (dolist (head (append
+ recentf-list
+ (delq nil (mapcar (lambda (bookmark)
+ (cdr (assoc 'filename bookmark)))
+ bookmarks))))
(setq name (file-name-nondirectory head))
;; In case HEAD is a directory with trailing /. See bug#14552.
(when (equal name "")