Mercurial > emacs
changeset 38794:47ae93b5ab9f
(image-jpeg-p): Fix call of substring.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Mon, 13 Aug 2001 10:16:16 +0000 |
| parents | 4800b18d484f |
| children | 0650ed8ff83f |
| files | lisp/image.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/image.el Mon Aug 13 09:52:55 2001 +0000 +++ b/lisp/image.el Mon Aug 13 10:16:16 2001 +0000 @@ -64,7 +64,7 @@ (when (and (>= code #xe0) (<= code #xef)) ;; APP0 LEN1 LEN2 "JFIF\0" (throw 'jfif - (string-match "JFIF" (substring data i nbytes)))) + (string-match "JFIF" (substring data i (+ i nbytes))))) (setq i (+ i 1 nbytes))))))))