diff options
Diffstat (limited to 'lisp/image.el')
-rw-r--r-- | lisp/image.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/image.el b/lisp/image.el index 83ab6288e9a..67c1ad946b1 100644 --- a/lisp/image.el +++ b/lisp/image.el @@ -681,8 +681,9 @@ is the delay in 100ths of a second until the next sub-image shall be displayed." (cond ((eq (plist-get (cdr image) :type) 'gif) - (let* ((extdata (image-extension-data image)) - (images (plist-get extdata 'count)) + (let* ((metadata (image-metadata image)) + (images (plist-get metadata 'count)) + (extdata (plist-get metadata 'extension-data)) (anim (plist-get extdata #xF9))) (and (integerp images) (> images 1) (stringp anim) (>= (length anim) 4) |