summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1996-01-28 03:07:15 +0000
committerRichard M. Stallman <rms@gnu.org>1996-01-28 03:07:15 +0000
commitef8e50b169b670d29418b521b4623e940c3fa8a5 (patch)
tree2f88bd1a41471e1be594ee445063451b44357c7a /lisp
parent000f808355abd45e95839d671f1d9ea77865e74f (diff)
downloademacs-ef8e50b169b670d29418b521b4623e940c3fa8a5.tar.gz
(edit-kbd-macro): Reject empty cmd name.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/edmacro.el2
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."
(setq cmd 'last-kbd-macro))
((eq cmd 'execute-extended-command)
(setq cmd (read-command "Name of keyboard macro to edit: "))
+ (if (string-equal cmd "")
+ (error "No command name given"))
(setq mac (symbol-function cmd)))
((eq cmd 'view-lossage)
(setq mac (recent-keys))