From: Richard M. Stallman <rms@gnu.org>
Date: Wed, 25 Sep 1996 22:37:27 +0000 (+0000)
Subject: (auto-mode-alist): Add lower-case varieties of
X-Git-Tag: emacs-20.1~3610
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6e6f5d9e7bc05546869e47c52768d96726b7eb6c;p=emacs.git

(auto-mode-alist): Add lower-case varieties of
ChangeLog filenames, for case-insensitive MSDOS and MS-Windows.

(insert-file-contents-literally): Doc fix.
---

diff --git a/lisp/files.el b/lisp/files.el
index b23bac8faf5..a013c91855b 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -718,7 +718,10 @@ If there is no such live buffer, return nil."
 A buffer may be modified in several ways after reading into the buffer due
 to advanced Emacs features, such as file-name-handlers, format decoding,
 find-file-hooks, etc.
-  This function ensures that none of these modifications will take place."
+  This function ensures that none of these modifications will take place.
+
+This function does not work for remote files, because it turns off
+file name handlers and remote file access uses a file name handler."
   (let ((file-name-handler-alist nil)
 	(format-alist nil)
 	(after-insert-file-functions nil)
@@ -966,6 +969,9 @@ run `normal-mode' explicitly."
     ("change.log\\'" . change-log-mode)
     ("changelo\\'" . change-log-mode)
     ("ChangeLog.[0-9]+\\'" . change-log-mode)
+    ;; for MSDOS and MS-Windows (which are case-insensitive)
+    ("changelog\\'" . change-log-mode)
+    ("changelog.[0-9]+\\'" . change-log-mode)
     ("\\$CHANGE_LOG\\$\\.TXT" . change-log-mode)
     ("\\.scm\\.[0-9]*\\'" . scheme-mode)
     ("\\.[ck]?sh\\'\\|\\.shar\\'\\|/\\.z?profile\\'" . sh-mode)