(image-type-regexps): For JPEG files, use a regexp

derived from the JPEG spec.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8d99f2303888d484134789a3cd8afec6ed8d7875..9a29f22ea5b51e05902bdd9108eb4d1e03264fb1 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2001-08-07  Gerd Moellmann  <gerd@gnu.org>
 
+       * image.el (image-type-regexps): For JPEG files, use a regexp
+       derived from the JPEG spec.
+       
        * image.el (image-type-regexps): Use `\`' instead of `^' in
        most regular expressions.
 

diff --git a/lisp/image.el b/lisp/image.el
index 14b9da5cf0763b294aa6343085b56ddff1c1758d..e0d19f5b776e465693261ac70d6f946abc499d1b 100644 (file)
--- a/lisp/image.el
+++ b/lisp/image.el
@@ -34,7 +34,8 @@
   '(("\\`/\\*.*XPM.\\*/" . xpm)
     ("\\`P[1-6]" . pbm)
     ("\\`GIF8" . gif)
-    ("JFIF" . jpeg)
+    ;; The following is from JPEG File Interchange Format, Version 1.02.
+    ("\\`\xff\xd8\xff\xe0..JFIF\0" . jpeg)
     ("\\`\211PNG\r\n" . png)
     ("\\`#define" . xbm)
     ("\\`\\(MM\0\\*\\)\\|\\(II\\*\0\\)" . tiff)