(auto-coding-regexp-alist): Add entries

for Unicode BOM.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 22a20d99412f032fd1bebaf3c1299aab5a64247e..8733b6644577f458fe81e9252a521d5b89553005 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2006-03-16  Kenichi Handa  <handa@m17n.org>
 
+       * international/mule.el (auto-coding-regexp-alist): Add entries
+       for Unicode BOM.
+
        * sort.el (sort-build-lists): Temporarily bind
        inhibit-field-text-motion to t.
 

diff --git a/lisp/international/mule.el b/lisp/international/mule.el
index d356736071d979d5f7a006ef0219bf7b565af0e2..20b0a3fc0efcf8514fb202b9eb3c5da394d1a369 100644 (file)
--- a/lisp/international/mule.el
+++ b/lisp/international/mule.el
@@ -1586,7 +1586,10 @@ and the contents of `file-coding-system-alist'."
                       (symbol :tag "Coding system"))))
 
 (defcustom auto-coding-regexp-alist
-  '(("^BABYL OPTIONS:[ \t]*-\\*-[ \t]*rmail[ \t]*-\\*-" . no-conversion))
+  '(("^BABYL OPTIONS:[ \t]*-\\*-[ \t]*rmail[ \t]*-\\*-" . no-conversion)
+    ("\\`\xFE\xFF" . utf-16be-with-signature)
+    ("\\`\xFF\xFE" . utf-16le-with-signature)
+    ("\\`\xEF\xBB\xBF" . utf-8))
   "Alist of patterns vs corresponding coding systems.
 Each element looks like (REGEXP . CODING-SYSTEM).
 A file whose first bytes match REGEXP is decoded by CODING-SYSTEM on reading.