mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-24 07:20:37 +00:00
Code Issues Releases Activity

* ido.el (ido-add-virtual-buffers-to-list): Use bookmark-get-filename.

Browse Source
This commit is contained in:
Leo Liu 2015-12-25 19:10:13 +08:00
parent 3e7f6338d8
commit b2b84b166a
1 changed files with 4 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lisp/ido.el
View File

@ -3491,14 +3491,12 @@ 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 ((bookmarks (and (boundp 'bookmark-alist)
bookmark-alist))
name)
(let (name)
(dolist (head (append
recentf-list
(delq nil (mapcar (lambda (bookmark)
(cdr (assoc 'filename bookmark)))
bookmarks))))
(and (fboundp 'bookmark-get-filename)
(delq nil (mapcar #'bookmark-get-filename
(bound-and-true-p bookmark-alist))))))
(setq name (file-name-nondirectory head))
;; In case HEAD is a directory with trailing /. See bug#14552.
(when (equal name "")