diff options
author | Stefan Kangas <stefan@marxist.se> | 2022-07-02 16:56:39 +0200 |
---|---|---|
committer | Stefan Kangas <stefan@marxist.se> | 2022-07-02 17:09:22 +0200 |
commit | ad73b588d48367dbef35c7561f79473317bd81f9 (patch) | |
tree | 59f105ecf2828699b652122b9439982c8711774a /lisp | |
parent | 1ee1d21c752c8a3eeb3d65a8d246c2c9979a2b40 (diff) | |
download | emacs-ad73b588d48367dbef35c7561f79473317bd81f9.tar.gz emacs-ad73b588d48367dbef35c7561f79473317bd81f9.tar.bz2 emacs-ad73b588d48367dbef35c7561f79473317bd81f9.zip |
Make dired-jump repeatable in repeat-mode
* lisp/dired.el (dired-jump-map): New variable.
(dired-jump): Put 'repeat-map' property with 'dired-jump-map'.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/dired.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/dired.el b/lisp/dired.el index dc7400d46e0..d7bf6316882 100644 --- a/lisp/dired.el +++ b/lisp/dired.el @@ -4797,6 +4797,11 @@ Interactively with prefix argument, read FILE-NAME." (read-file-name "Jump to Dired file: ")))) (dired-jump t file-name)) +(defvar-keymap dired-jump-map + :doc "Keymap to repeat `dired-jump'. Used in `repeat-mode'." + "C-j" #'dired-jump) +(put 'dired-jump 'repeat-map 'dired-jump-map) + ;;; Miscellaneous commands |