diff options
| author | Kenichi Handa <handa@m17n.org> | 2008-06-25 02:48:03 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 2008-06-25 02:48:03 +0000 |
| commit | 9a9d8a8fa7018891b9f17587c2019f2e75394dc4 (patch) | |
| tree | fc9abaca1f85bf85dc6c9685fd29aa896bbfecbe /lisp/image.el | |
| parent | e53ac7180fb7c29d7577a7b93f28e3de00e65e16 (diff) | |
| download | emacs-9a9d8a8fa7018891b9f17587c2019f2e75394dc4.tar.gz | |
(image-jpeg-p): Convert DATA to unibyte at first.
Diffstat (limited to 'lisp/image.el')
| -rw-r--r-- | lisp/image.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/image.el b/lisp/image.el index 4969f8a4762..7dfa0d4a327 100644 --- a/lisp/image.el +++ b/lisp/image.el @@ -208,6 +208,7 @@ compatibility with versions of Emacs that lack the variable (defun image-jpeg-p (data) "Value is non-nil if DATA, a string, consists of JFIF image data. We accept the tag Exif because that is the same format." + (setq data (string-to-unibyte data)) (when (string-match "\\`\xff\xd8" data) (catch 'jfif (let ((len (length data)) (i 2)) |