Mercurial > emacs
changeset 5862:0449645855c3
(disabled-command-hook): Use eq to compare elts of this-command-keys.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Wed, 09 Feb 1994 05:36:48 +0000 |
parents | 882894a8c217 |
children | 2c5240294c30 |
files | lisp/novice.el |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/novice.el Wed Feb 09 04:26:28 1994 +0000 +++ b/lisp/novice.el Wed Feb 09 05:36:48 1994 +0000 @@ -42,7 +42,7 @@ (let (char) (save-window-excursion (with-output-to-temp-buffer "*Help*" - (if (= (aref (this-command-keys) 0) ?\M-x) + (if (eq (aref (this-command-keys) 0) ?\M-x) (princ "You have invoked the disabled command ") (princ "You have typed ") (princ (key-description (this-command-keys)))