From: Richard M. Stallman Date: Wed, 9 Feb 1994 05:36:48 +0000 (+0000) Subject: (disabled-command-hook): Use eq to compare elts of this-command-keys. X-Git-Tag: emacs-19.34~9989 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c7d7ed2771c270d51951ff97f2655abdb2aed932;p=emacs.git (disabled-command-hook): Use eq to compare elts of this-command-keys. --- 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)))