diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2020-12-11 15:16:05 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2020-12-11 15:16:05 +0100 |
| commit | 72bcc6f988350329f3c0eb2f86af17f3ed97cf40 (patch) | |
| tree | 47833839b39088ef50216098ff8dbffd9463b421 /lisp/image | |
| parent | 004d7e97e2c54c1089a776055ffd173d132fe5ae (diff) | |
| download | emacs-72bcc6f988350329f3c0eb2f86af17f3ed97cf40.tar.gz | |
Fix parsing error in exif
* lisp/image/exif.el (exif--parse-exif-chunk): The offset is a
four-byte number. Reported by Alan Light <lightalan@gmail.com>.
Diffstat (limited to 'lisp/image')
| -rw-r--r-- | lisp/image/exif.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/image/exif.el b/lisp/image/exif.el index 6aeb52c726d..e328fcce5a8 100644 --- a/lisp/image/exif.el +++ b/lisp/image/exif.el @@ -165,7 +165,7 @@ If the orientation isn't present in the data, return nil." ;; Another magical number. (unless (= (exif--read-number 2 le) #x002a) (signal 'exif-error "Invalid TIFF header length")) - (let ((offset (exif--read-number 2 le))) + (let ((offset (exif--read-number 4 le))) ;; Jump to where the IFD (directory) starts and parse it. (when (> (1+ offset) (point-max)) (signal 'exif-error "Invalid IFD (directory) offset")) |