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

[Miles Bader]

Index: emacs/lisp/image.el
diff -c emacs/lisp/image.el:1.31.2.1 emacs/lisp/image.el:1.31.2.2
*** emacs/lisp/image.el:1.31.2.1        Fri Apr  4 01:20:08 2003
--- emacs/lisp/image.el Tue Oct 14 19:51:09 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))))))))
  
  
***************
*** 292,295 ****
--- 293,297 ----
  
  (provide 'image)
  
+ ;;; arch-tag: 8e76a07b-eb48-4f3e-a7a0-1a7ba9f096b3
  ;;; image.el ends here