diff --git a/init.el b/init.el index a5e5cac..b717605 100644 --- a/init.el +++ b/init.el @@ -211,6 +211,7 @@ (bind-key "C-x C-b" #'ibuffer) (bind-key "C-x g" #'db/helm-shortcuts) (bind-key "C-x SPC" #'hydra-rectangle/body) + (bind-key "C-x r E" #'db/bookmark-add-dired-external) (bind-key "C-x r M" #'db/bookmark-add-url) (bind-key "C-x r v" #'list-registers) (bind-key "C-x t" #'hydra-toggle/body) @@ -560,6 +561,7 @@ db/one-monitor-xrandr db/pretty-print-xml db/bookmark-add-external + db/bookmard-add-dired-external db/bookmark-add-url db/lookup-smime-key db/org-onenote-open diff --git a/site-lisp/db-utils.el b/site-lisp/db-utils.el index b8d0122..82a8523 100644 --- a/site-lisp/db-utils.el +++ b/site-lisp/db-utils.el @@ -523,6 +523,11 @@ it. The bookmarks will finally be sorted by their name." (interactive "sLocation: \nsName: ") (db/bookmark-add-with-handler name location #'db/system-open)) +(defun db/bookmark-add-dired-external (location name) + "Add NAME as bookmark to LOCATION that is opened by `dired-open-file'." + (interactive "sLocation: \nsName: ") + (db/bookmark-add-with-handler name location #'dired-open-file)) + (defun db/bookmark-add-url (url name) "Add NAME as bookmark to URL that is opened by `browse-url’." (interactive "sURL: \nsName: ")