lisp/gnus/gnus-sum.el (gnus-summary-exit): Stop animations

2 files changed, 6 insertions, 0 deletions

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 693483a5775..a983c86bcf4 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,7 @@
+2013-12-25  Lars Ingebrigtsen  <larsi@gnus.org>
+
+        * gnus-sum.el (gnus-summary-exit): Stop animations.
+
 2013-12-19  Juri Linkov  <juri@jurta.org>
 
         * gnus.el (gnus-suppress-keymap):
diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el
index 6873db7f6bc..6dbe7bfef0f 100644
--- a/lisp/gnus/gnus-sum.el
+++ b/lisp/gnus/gnus-sum.el
@@ -7278,6 +7278,7 @@ If FORCE (the prefix), also save the .newsrc file(s)."
                 (not (string= group (gnus-group-group-name))))
       (gnus-group-next-unread-group 1))
     (setq group-point (point))
+    (gnus-article-stop-animations)
     (if temporary
         nil                             ;Nothing to do.
       (set-buffer buf)
@@ -7368,6 +7369,7 @@ If FORCE (the prefix), also save the .newsrc file(s)."
         (gnus-group-update-group group nil t))
       (when (equal (gnus-group-group-name) group)
         (gnus-group-next-unread-group 1))
+      (gnus-article-stop-animations)
       (when quit-config
         (gnus-handle-ephemeral-exit quit-config)))))