branch: externals/blist
commit acb8192f426243986fcc165393d95c18c5cf19ad
Author: JSDurand <mmem...@gmail.com>
Commit: JSDurand <mmem...@gmail.com>
Fix an error in `blist-select'
* blist.el (blist-select): The function `bookmark-jump' expects the
argument to be a string, so we shall give it a string. Otherwise,
we will end up having non-string elements in the variable
`bookmark-history', and then we won't be able to inspect the
bookmark history later in `bookmark-jump'.
---
blist.el | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/blist.el b/blist.el
index 3a5e2b1bf8..ed96ac7472 100644
--- a/blist.el
+++ b/blist.el
@@ -888,7 +888,8 @@ controls how multiple bookmarks are selected."
(orig-window (car windows)))
(while (consp windows)
(select-window (car windows))
- (bookmark-jump (car marked-items))
+ (bookmark-jump
+ (bookmark-name-from-full-record (car marked-items)))
(setq marked-items (cdr marked-items))
(setq windows (cdr windows)))
(select-window orig-window)))
@@ -1440,6 +1441,8 @@ get unique numeric suffixes \"<2>\", \"<3>\", etc."
((ilist-get-index) (blist-open))
((user-error "Nothing to do here"))))
+;; TODO: Hide all other groups
+
;;;; Toggle location display
(defun blist-toggle-location ()
