[Emacs-diffs] emacs/lisp/international mule-cmds.el

[Glenn Morris]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       09/01/08 04:07:31

Modified files:
        lisp/international: mule-cmds.el 

Log message:
        (universal-coding-system-argument): last-input-char need not be a char.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/international/mule-cmds.el?cvsroot=emacs&r1=1.350&r2=1.351

Patches:
Index: mule-cmds.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/international/mule-cmds.el,v
retrieving revision 1.350
retrieving revision 1.351
diff -u -b -r1.350 -r1.351
--- mule-cmds.el        5 Jan 2009 03:22:22 -0000       1.350
+++ mule-cmds.el        8 Jan 2009 04:07:31 -0000       1.351
@@ -288,7 +288,7 @@
         prefix)
     ;; read-key-sequence ignores quit, so make an explicit check.
     ;; Like many places, this assumes quit == C-g, but it need not be.
-    (if (char-equal last-input-char ?\C-g)
+    (if (equal last-input-char ?\C-g)
        (keyboard-quit))
     (when (memq cmd '(universal-argument digit-argument))
       (call-interactively cmd)