Mercurial > hg > xemacs-beta

diff lisp/mule/mule-cmds.el @ 5473:ac37a5f7e5be

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge with trunk.
author Mats Lidell <matsl@xemacs.org>
date Thu, 17 Mar 2011 23:42:59 +0100
parents 308d34e9f07d f00192e1cd49
children 48a3d3281b48
line wrap: on
line diff
--- a/lisp/mule/mule-cmds.el	Tue Feb 22 22:56:02 2011 +0100
+++ b/lisp/mule/mule-cmds.el	Thu Mar 17 23:42:59 2011 +0100
@@ -777,7 +777,7 @@
      #'(lambda (key entry)
          (setq string (decode-coding-string (string entry)
                                             invalid-sequence-coding-system))
-         (when (= 1 (length string))
+         (when (eql 1 (length string))
 	   ;; Treat Unicode error sequence chars as the octets
 	   ;; corresponding to those on disk:
 	   (setq unicode-error-lookup