(disabled-command-hook): Use eq to compare elts of this-command-keys.
authorRichard M. Stallman <rms@gnu.org>
Wed, 9 Feb 1994 05:36:48 +0000 (05:36 +0000)
committerRichard M. Stallman <rms@gnu.org>
Wed, 9 Feb 1994 05:36:48 +0000 (05:36 +0000)
lisp/novice.el

index 972d073..922746d 100644 (file)
@@ -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)))