[gnus git] branch master updated: m0-5-265-g2d7ef23 =1= shr.el (shr-put-image): Use image-multi-frame-p if available

       via  2d7ef23c08c4e1ebe8b2712d821d2d5837f83f3d (commit)
      from  06f5a69aeb8b3c085fad294022b763f68251bd7a (commit)


- Log -----------------------------------------------------------------
commit 2d7ef23c08c4e1ebe8b2712d821d2d5837f83f3d
Author: Glenn Morris <[email protected]>
Date:   Sun Feb 17 08:36:08 2013 +0000

    shr.el (shr-put-image): Use image-multi-frame-p if available

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d50750b..6f3e88d 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2013-02-17  Glenn Morris  <[email protected]>
+
+	* shr.el (shr-put-image): Use image-multi-frame-p if available.
+
 2013-02-16  Glenn Morris  <[email protected]>
 
 	* shr.el (shr-put-image): Only animate images that specify a delay.
diff --git a/lisp/shr.el b/lisp/shr.el
index 1294ca7..886f4da 100644
--- a/lisp/shr.el
+++ b/lisp/shr.el
@@ -615,8 +615,12 @@ size, and full-buffer size."
 		  (overlay-put overlay 'face 'default)))
 	    (insert-image image (or alt "*")))
 	  (put-text-property start (point) 'image-size size)
-	  ;; Only animate multi-frame things that specify a delay.  FIXME?
-	  (when (cdr (image-animated-p image))
+	  (when (if (fboundp 'image-multi-frame-p)
+		    ;; Only animate multi-frame things that specify a
+		    ;; delay; eg animated gifs as opposed to
+		    ;; multi-page tiffs.  FIXME?
+		    (cdr (image-multi-frame-p image))
+		  (image-animated-p image))
 	    (image-animate image nil 60)))
 	image)
     (insert alt)))

-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.

Summary of changes:
 lisp/ChangeLog |    4 ++++
 lisp/shr.el    |    8 ++++++--
 2 files changed, 10 insertions(+), 2 deletions(-)

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".

The branch, master has been updated


hooks/post-receive
-- 
Gnus Project