[Emacs-diffs] Changes to emacs/lisp/image.el

[John Paul Wallington]

Index: emacs/lisp/image.el
diff -c emacs/lisp/image.el:1.35 emacs/lisp/image.el:1.36
*** emacs/lisp/image.el:1.35    Tue Feb  4 06:27:37 2003
--- emacs/lisp/image.el Tue Aug 26 11:36:50 2003
***************
*** 67,73 ****
            (when (and (>= code #xe0) (<= code #xef))
              ;; APP0 LEN1 LEN2 "JFIF\0"
              (throw 'jfif
!                    (string-match "JFIF\\|Exif" (substring data i (+ i 
nbytes)))))
            (setq i (+ i 1 nbytes))))))))
  
  
--- 67,74 ----
            (when (and (>= code #xe0) (<= code #xef))
              ;; APP0 LEN1 LEN2 "JFIF\0"
              (throw 'jfif
!                    (string-match "JFIF\\|Exif"
!                                  (substring data i (min (+ i nbytes) len)))))
            (setq i (+ i 1 nbytes))))))))