diff options
Diffstat (limited to 'lisp/printing.el')
| -rw-r--r-- | lisp/printing.el | 12 |
1 files changed, 5 insertions, 7 deletions
diff --git a/lisp/printing.el b/lisp/printing.el index d10de24e03c..0654dcda3df 100644 --- a/lisp/printing.el +++ b/lisp/printing.el @@ -5546,13 +5546,11 @@ COMMAND.exe, COMMAND.bat and COMMAND.com in this order." (defvar pr-i-ps-send 'printer) -(defvar pr-interface-map - (let ((map (make-sparse-keymap))) - (set-keymap-parent map widget-keymap) - (define-key map "q" 'pr-interface-quit) - (define-key map "?" 'pr-interface-help) - map) - "Keymap for `pr-interface'.") +(defvar-keymap pr-interface-map + :doc "Keymap for `pr-interface'." + :parent widget-keymap + "q" #'pr-interface-quit + "?" #'pr-interface-help) (defmacro pr-interface-save (&rest body) `(with-current-buffer pr-i-buffer |