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

for Unicode BOM.

2 files changed, 7 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 22a20d99412..8733b664457 100644
--- 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 d356736071d..20b0a3fc0ef 100644
--- 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.