[gnus git] branch master updated: =1= (shr-rescale-image): Display all GIF images as animated images.

       via  568f5b639f3650da336b51947eea41ddb3752965 (commit)
      from  fd35ba81e6258dd946a1e3c71dca391f64672afa (commit)


- Log -----------------------------------------------------------------
commit 568f5b639f3650da336b51947eea41ddb3752965
Author: Lars Magne Ingebrigtsen <[email protected]>
Date:   Sun Jan 2 21:19:02 2011 +0100

    (shr-rescale-image): Display all GIF images as animated images.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f3ca14b..7e5abde 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2011-01-02  Lars Magne Ingebrigtsen  <[email protected]>
 
+	* shr.el (shr-rescale-image): Display all GIF images as animated images.
+
 	* nnimap.el (nnimap-login): Refactored out into own function, and
 	implement CRAM-MD5.
 	(nnimap-wait-for-line): Refactored out.
diff --git a/lisp/shr.el b/lisp/shr.el
index 0ed73cd..6e681d6 100644
--- a/lisp/shr.el
+++ b/lisp/shr.el
@@ -507,6 +507,9 @@ redirects somewhere else."
 		     (create-image data 'imagemagick t
 				   :width window-width)
 		     image)))
+      (when (and (fboundp 'create-animated-image)
+		 (eq (image-type data nil t) 'gif))
+	(setq image (create-animated-image data 'gif t)))
       image)))
 
 ;; url-cache-extract autoloads url-cache.

-----------------------------------------------------------------------
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 |    2 ++
 lisp/shr.el    |    3 +++
 2 files changed, 5 insertions(+), 0 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