File tree Expand file tree Collapse file tree 1 file changed +5
-12
lines changed Expand file tree Collapse file tree 1 file changed +5
-12
lines changed Original file line number Diff line number Diff line change @@ -3174,22 +3174,15 @@ CANDS is a list of strings."
3174
3174
3175
3175
(defun ivy--virtual-buffers ()
3176
3176
" Adapted from `ido-add-virtual-buffers-to-list' ."
3177
+ (require 'bookmark )
3177
3178
(unless recentf-mode
3178
3179
(recentf-mode 1 ))
3179
- (let ((bookmarks (and (boundp 'bookmark-alist )
3180
- (copy-sequence bookmark-alist)))
3181
- virtual-buffers)
3180
+ (let (virtual-buffers)
3181
+ (bookmark-maybe-load-default-file )
3182
3182
(dolist (head (append
3183
3183
(copy-sequence recentf-list)
3184
- (delq nil (mapcar
3185
- (lambda (bookmark )
3186
- (let (file)
3187
- (when (setq file (assoc 'filename bookmark))
3188
- (unless (string= (cdr file)
3189
- " - no file -" )
3190
- (cons (car bookmark)
3191
- (cdr file))))))
3192
- bookmarks))))
3184
+ (delq nil (mapcar #'bookmark-get-filename
3185
+ (copy-sequence bookmark-alist)))))
3193
3186
(let ((file-name (if (stringp head)
3194
3187
head
3195
3188
(cdr head)))
You can’t perform that action at this time.
0 commit comments