diff options
| author | Stefan Kangas <stefan@marxist.se> | 2022-06-22 12:14:06 +0200 |
|---|---|---|
| committer | Stefan Kangas <stefan@marxist.se> | 2022-06-22 12:14:06 +0200 |
| commit | f3c78c6ea7045734fa5e524d683d6cf6435b90bb (patch) | |
| tree | 0a9b20c1319007e87fc696546c9ea398ee272dfb /lisp/edmacro.el | |
| parent | ec9228eb81c0a89b18480dfff18cc9afdc3d0884 (diff) | |
| download | emacs-f3c78c6ea7045734fa5e524d683d6cf6435b90bb.tar.gz | |
Do interactive mode tagging in edmacro.el
* lisp/edmacro.el (edmacro-finish-edit, edmacro-insert-key):
Add interactive mode tag for edmacro-mode.
Diffstat (limited to 'lisp/edmacro.el')
| -rw-r--r-- | lisp/edmacro.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/edmacro.el b/lisp/edmacro.el index 2f5a8c137e4..bdc50c5885a 100644 --- a/lisp/edmacro.el +++ b/lisp/edmacro.el @@ -255,7 +255,7 @@ or nil, use a compact 80-column format." ;;; Commands for *Edit Macro* buffer. (defun edmacro-finish-edit () - (interactive) + (interactive nil edmacro-mode) (unless (eq major-mode 'edmacro-mode) (error "This command is valid only in buffers created by `edit-kbd-macro'")) @@ -366,7 +366,7 @@ or nil, use a compact 80-column format." (defun edmacro-insert-key (key) "Insert the written name of a KEY in the buffer." - (interactive "kKey to insert: ") + (interactive "kKey to insert: " edmacro-mode) (if (bolp) (insert (edmacro-format-keys key t) "\n") (insert (edmacro-format-keys key) " "))) |