(auto-coding-regexp-alist): Only match BABYL... at the start of

buffer, not of lines.  (Bug#3790)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1d8d716246188337e70e1484b6f7f8fba314b158..4c74d22f737632f8e61c340895e492b3b20c2b3f 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2009-07-19  Glenn Morris  <rgm@gnu.org>
 
+       * international/mule.el (auto-coding-regexp-alist): Only match
+       BABYL... at the start of buffer, not of lines.  (Bug#3790)
+
        * calendar/cal-menu.el (cal-menu-set-date-title): Handle calls from
        non-calendar buffers (Bug#3862).  Restore "not on a date" message.
        (cal-menu-context-mouse-menu): Doc fix.

diff --git a/lisp/international/mule.el b/lisp/international/mule.el
index cd0f127a025a2b3a0be48a56e4a2c96c4a6ad236..9cbec2f024d35c22cb9b371aecaa1eaf4e39d84c 100644 (file)
--- a/lisp/international/mule.el
+++ b/lisp/international/mule.el
@@ -1,6 +1,7 @@
 ;;; mule.el --- basic commands for multilingual environment
 
-;; Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009
+;; Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006,
+;;   2007, 2008, 2009
 ;;   Free Software Foundation, Inc.
 ;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
 ;;   2005, 2006, 2007, 2008, 2009
@@ -1646,7 +1647,7 @@ 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-with-signature)