[Emacs-diffs] emacs/lisp image.el

[Juri Linkov]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Juri Linkov <jurta>     09/08/28 23:49:12

Modified files:
        lisp           : image.el 

Log message:
        (image-type-header-regexps): Use only JPEG magic number
        to determine JPEG images, and don't use `image-jpeg-p' because
        Emacs can display non-JFIF non-Exif JPEG images.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/image.el?cvsroot=emacs&r1=1.87&r2=1.88

Patches:
Index: image.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/image.el,v
retrieving revision 1.87
retrieving revision 1.88
diff -u -b -r1.87 -r1.88
--- image.el    24 Feb 2009 10:29:00 -0000      1.87
+++ image.el    28 Aug 2009 23:49:11 -0000      1.88
@@ -43,7 +43,7 @@
 static \\(unsigned \\)?char \\1_bits" . xbm)
     ("\\`\\(?:MM\0\\*\\|II\\*\0\\)" . tiff)
     ("\\`[\t\n\r ]*%!PS" . postscript)
-    ("\\`\xff\xd8" . (image-jpeg-p . jpeg))
+    ("\\`\xff\xd8" . jpeg)    ; used to be (image-jpeg-p . jpeg)
     (,(let* ((incomment-re "\\(?:[^-]\\|-[^-]\\)")
             (comment-re (concat "\\(?:!--" incomment-re "*-->[ \t\r\n]*<\\)")))
        (concat "\\(?:<\\?xml[ \t\r\n]+[^>]*>\\)?[ \t\r\n]*<"