about summary refs log tree commit diff
path: root/emacs/.emacs.d/wpc/bookmark.el
diff options
context:
space:
mode:
authorWilliam Carroll <wpcarro@gmail.com>2020-09-07T22·37+0100
committerWilliam Carroll <wpcarro@gmail.com>2020-09-07T22·37+0100
commit74f1359924d3d03a89392b837d5089351913cedc (patch)
tree431d879fc433b8b73f8f866f7b1553af900c9047 /emacs/.emacs.d/wpc/bookmark.el
parentc7af26b2af6961249b76fe0e010a594ded72c6c8 (diff)
Install additional KBDs for bookmark.el
Generate KBDs to call `find-file` on the bookmark.
Diffstat (limited to 'emacs/.emacs.d/wpc/bookmark.el')
-rw-r--r--emacs/.emacs.d/wpc/bookmark.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/emacs/.emacs.d/wpc/bookmark.el b/emacs/.emacs.d/wpc/bookmark.el
index 2eca628409b1..76fc6fe4d75b 100644
--- a/emacs/.emacs.d/wpc/bookmark.el
+++ b/emacs/.emacs.d/wpc/bookmark.el
@@ -89,7 +89,9 @@ Otherwise, open with `counsel-find-file'."
           (general-define-key
            :prefix "<SPC>"
            :states '(normal)
-           (string-concat "j" (bookmark-kbd b))
+           (format "J%s" (bookmark-kbd b))
+           (lambda () (interactive) (find-file (bookmark-path b)))
+           (format "j%s" (bookmark-kbd b))
            ;; TODO: Consider `cl-labels' so `which-key' minibuffer is more
            ;; helpful.
            (lambda () (interactive) (bookmark-open b)))))))