Mercurial > emacs
changeset 4188:10fd517cb2e9
(define-key-after): Fix typo in previous change.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Tue, 20 Jul 1993 18:09:21 +0000 |
| parents | b3df9c7072bb |
| children | 14c8cd7926a0 |
| files | lisp/subr.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/subr.el Tue Jul 20 17:57:35 1993 +0000 +++ b/lisp/subr.el Tue Jul 20 18:09:21 1993 +0000 @@ -191,7 +191,7 @@ of length 1." (or (keymapp keymap) (signal 'wrong-type-argument (list 'keymapp keymap))) - (if (> (length key) 0) + (if (> (length key) 1) (error "multi-event key specified in `define-key-after'")) (let ((tail keymap) done inserted (first (aref key 0)))