[Emacs-diffs] Changes to emacs/lisp/international/mule.el, v [EMACS_22_BASE]

[Glenn Morris]

CVSROOT:        /sources/emacs
Module name:    emacs
Branch:         EMACS_22_BASE
Changes by:     Glenn Morris <gm>       07/09/21 03:18:29

Index: mule.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/international/mule.el,v
retrieving revision 1.255.2.3
retrieving revision 1.255.2.4
diff -u -b -r1.255.2.3 -r1.255.2.4
--- mule.el     25 Jul 2007 07:41:03 -0000      1.255.2.3
+++ mule.el     21 Sep 2007 03:18:29 -0000      1.255.2.4
@@ -2302,6 +2302,7 @@
 (defun sgml-html-meta-auto-coding-function (size)
   "If the buffer has an HTML meta tag, use it to determine encoding.
 This function is intended to be added to `auto-coding-functions'."
+  (let ((case-fold-search t))
   (setq size (min (+ (point) size)
                  (save-excursion
                    ;; Limit the search by the end of the HTML header.
@@ -2320,7 +2321,7 @@
       (if (coding-system-p sym)
          sym
        (message "Warning: unknown coding system \"%s\"" match)
-       nil))))
+         nil)))))
 
 ;;;
 (provide 'mule)