emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] master 9fec778: * lisp/gnus/gnus-art.el (gnus-article-stop


From: Michael Albinus
Subject: [Emacs-diffs] master 9fec778: * lisp/gnus/gnus-art.el (gnus-article-stop-animations):
Date: Fri, 28 Jun 2019 08:04:09 -0400 (EDT)

branch: master
commit 9fec778c072d7f6869dfc035243ed285bb0ed15a
Author: Michael Albinus <address@hidden>
Commit: Michael Albinus <address@hidden>

    * lisp/gnus/gnus-art.el (gnus-article-stop-animations):
    
    Use `cancel-function-timers'.
---
 lisp/gnus/gnus-art.el | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index d826fac..601ea00 100644
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -4559,10 +4559,7 @@ commands:
          (current-buffer))))))
 
 (defun gnus-article-stop-animations ()
-  (dolist (timer (and (boundp 'timer-list)
-                     timer-list))
-    (when (eq (timer--function timer) 'image-animate-timeout)
-      (cancel-timer timer))))
+  (cancel-function-timers 'image-animate-timeout))
 
 (defun gnus-stop-downloads ()
   (when (boundp 'url-queue)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]