diff options
| -rw-r--r-- | lisp/edmacro.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/edmacro.el b/lisp/edmacro.el index 7f2d8d47fc0..35be9ba054d 100644 --- a/lisp/edmacro.el +++ b/lisp/edmacro.el | |||
| @@ -112,6 +112,8 @@ With a prefix argument, format the macro in a more concise way." | |||
| 112 | (setq cmd 'last-kbd-macro)) | 112 | (setq cmd 'last-kbd-macro)) |
| 113 | ((eq cmd 'execute-extended-command) | 113 | ((eq cmd 'execute-extended-command) |
| 114 | (setq cmd (read-command "Name of keyboard macro to edit: ")) | 114 | (setq cmd (read-command "Name of keyboard macro to edit: ")) |
| 115 | (if (string-equal cmd "") | ||
| 116 | (error "No command name given")) | ||
| 115 | (setq mac (symbol-function cmd))) | 117 | (setq mac (symbol-function cmd))) |
| 116 | ((eq cmd 'view-lossage) | 118 | ((eq cmd 'view-lossage) |
| 117 | (setq mac (recent-keys)) | 119 | (setq mac (recent-keys)) |