diff options
| author | Karl Heuer <kwzh@gnu.org> | 1995-05-22 22:08:18 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1995-05-22 22:08:18 +0000 |
| commit | 32a1fb38b1bf5ab121e923fa88a574ce4cb12751 (patch) | |
| tree | 32b23d33d6bdd7916342c045c8eee3d7eeb89fa2 /lisp/edmacro.el | |
| parent | 0ef6990e8add2db74f1b262a639daeecc9f44ef9 (diff) | |
| download | emacs-32a1fb38b1bf5ab121e923fa88a574ce4cb12751.tar.gz | |
(edit-kbd-macro): Better error messages for undefined keys
or keys that are not keyboard macros.
Diffstat (limited to 'lisp/edmacro.el')
| -rw-r--r-- | lisp/edmacro.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/edmacro.el b/lisp/edmacro.el index 8c9eaa2ed09..0255a675072 100644 --- a/lisp/edmacro.el +++ b/lisp/edmacro.el @@ -114,13 +114,16 @@ With a prefix argument, format the macro in a more concise way." ((eq cmd 'view-lossage) (setq mac (recent-keys)) (setq cmd 'last-kbd-macro)) + ((null cmd) + (error "Key sequence %s is not defined" (key-description keys))) ((symbolp cmd) (setq mac (symbol-function cmd))) (t (setq mac cmd) (setq cmd nil))) (unless (arrayp mac) - (error "Not a keyboard macro: %s" cmd)) + (error "Key sequence %s is not a keyboard macro" + (key-description keys))) (message "Formatting keyboard macro...") (let* ((oldbuf (current-buffer)) (mmac (edmacro-fix-menu-commands mac)) |