(quail-show-key): Fix previous change.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 56bfe69acd7e86002ab5d6cc82d923f241e68021..41641af1570ca2cef3cf77a94b441b8738111d29 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2007-02-01  Kenichi Handa  <handa@m17n.org>
+
+       * international/quail.el (quail-show-key): Signal an error if the
+       current input method is not using Quail.
+
 2007-02-01  J.D. Smith  <jdsmith@as.arizona.edu>
 
        * progmodes/idlwave.el (idlwave-xml-create-sysvar-alist): Trim

diff --git a/lisp/international/quail.el b/lisp/international/quail.el
index 7cedcbf665a9a10b5a2e2626b2d08b3975f1cbad..a14d358c8ad0eff8eacc8f285fb14c5dc2abbe5c 100644 (file)
--- a/lisp/international/quail.el
+++ b/lisp/international/quail.el
@@ -2773,7 +2773,7 @@ If CHAR is an ASCII character and can be input by typing itself, return t."
   (or current-input-method
       (error "No input method is activated"))
   (or (assoc current-input-method quail-package-alist)
-      (error "The current input method is not using Quail."))
+      (error "The current input method is not using Quail"))
   (let* ((char (following-char))
         (key-list (quail-find-key char)))
     (cond ((consp key-list)