summaryrefslogtreecommitdiff
path: root/lisp/novice.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1994-02-09 05:36:48 +0000
committerRichard M. Stallman <rms@gnu.org>1994-02-09 05:36:48 +0000
commit499080a054b422230e25eec2b5167cfff6d8625f (patch)
tree124b129f199d25e8ae99dba074d2733d8700f5e9 /lisp/novice.el
parent42ebce877a60d85edee7cc7e35531ac094daef6f (diff)
downloademacs-499080a054b422230e25eec2b5167cfff6d8625f.tar.gz
(disabled-command-hook): Use eq to compare elts of this-command-keys.
Diffstat (limited to 'lisp/novice.el')
-rw-r--r--lisp/novice.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/novice.el b/lisp/novice.el
index 972d0737649..922746d1c4c 100644
--- a/lisp/novice.el
+++ b/lisp/novice.el
@@ -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)))