Skip to content

Commit

Permalink
Move definition of transient-resume-mode-map
Browse files Browse the repository at this point in the history
  • Loading branch information
tarsius committed Nov 21, 2023
1 parent ee26a40 commit c885d12
Showing 1 changed file with 10 additions and 10 deletions.
20 changes: 10 additions & 10 deletions lisp/transient.el
Original file line number Diff line number Diff line change
Expand Up @@ -1649,6 +1649,16 @@ See `transient-enable-popup-navigation'."
"<mouse-1>" #'transient-push-button
"<mouse-2>" #'transient-push-button)

(defvar-keymap transient-resume-mode-map
:doc "Keymap for `transient-resume-mode'.
This keymap remaps every command that would usually just quit the
documentation buffer to `transient-resume', which additionally
resumes the suspended transient."
"<remap> <Man-quit>" #'transient-resume
"<remap> <Info-exit>" #'transient-resume
"<remap> <quit-window>" #'transient-resume)

(defvar-keymap transient-predicate-map
:doc "Base keymap used to map common commands to their transient behavior.
Expand Down Expand Up @@ -4032,16 +4042,6 @@ Suffixes on levels %s and %s are unavailable.\n"
(propertize (format ">=%s" (1+ level))
'face 'transient-disabled-suffix))))))

(defvar-keymap transient-resume-mode-map
:doc "Keymap for `transient-resume-mode'.
This keymap remaps every command that would usually just quit the
documentation buffer to `transient-resume', which additionally
resumes the suspended transient."
"<remap> <Man-quit>" #'transient-resume
"<remap> <Info-exit>" #'transient-resume
"<remap> <quit-window>" #'transient-resume)

(define-minor-mode transient-resume-mode
"Auxiliary minor-mode used to resume a transient after viewing help.")

Expand Down

0 comments on commit c885d12

Please sign in to comment.