# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 997171390 0
# Node ID 00a56d6da6604fb5d2563750d1d35538ec3395f9
# Parent  456acc0ad1ee3cafdce3f0616dfbef5ec0f32a0e
(image-type-regexps): Use `\`' instead of `^' in
most regular expressions.

diff -r 456acc0ad1ee -r 00a56d6da660 lisp/image.el
--- a/lisp/image.el	Mon Aug 06 21:29:16 2001 +0000
+++ b/lisp/image.el	Tue Aug 07 08:03:10 2001 +0000
@@ -31,14 +31,14 @@
 
 
 (defconst image-type-regexps
-  '(("^/\\*.*XPM.\\*/" . xpm)
-    ("^P[1-6]" . pbm)
-    ("^GIF8" . gif)
+  '(("\\`/\\*.*XPM.\\*/" . xpm)
+    ("\\`P[1-6]" . pbm)
+    ("\\`GIF8" . gif)
     ("JFIF" . jpeg)
-    ("^\211PNG\r\n" . png)
-    ("^#define" . xbm)
-    ("^\\(MM\0\\*\\)\\|\\(II\\*\0\\)" . tiff)
-    ("^%!PS" . postscript))
+    ("\\`\211PNG\r\n" . png)
+    ("\\`#define" . xbm)
+    ("\\`\\(MM\0\\*\\)\\|\\(II\\*\0\\)" . tiff)
+    ("\\`%!PS" . postscript))
   "Alist of (REGEXP . IMAGE-TYPE) pairs used to auto-detect image types.
 When the first bytes of an image file match REGEXP, it is assumed to
 be of image type IMAGE-TYPE.")