[gnus git] branch master updated: n0-17-98-g5a9391c =1= Make the timer warning go away on XEmacs.

       via  5a9391c6bebb2441d3cdabc993ed4bff5a134f5f (commit)
      from  8780d8751e0f587624e8811aea7a40983d786d7c (commit)


- Log -----------------------------------------------------------------
commit 5a9391c6bebb2441d3cdabc993ed4bff5a134f5f
Author: Lars Magne Ingebrigtsen <[email protected]>
Date:   Sun Jun 26 23:31:41 2011 +0200

    Make the timer warning go away on XEmacs.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ad36326..171806a 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2011-06-26  Lars Magne Ingebrigtsen  <[email protected]>
 
+	* dgnushack.el: Make the timer warning go away on XEmacs.
+
 	* gnus-art.el (gnus-article-stop-animations): New function to stop any
 	animations going on at article exit time.
 
diff --git a/lisp/dgnushack.el b/lisp/dgnushack.el
index c82df3f..5141a00 100644
--- a/lisp/dgnushack.el
+++ b/lisp/dgnushack.el
@@ -238,6 +238,7 @@
     (defalias 'replace-dehighlight 'ignore)
     (defalias 'replace-highlight 'ignore)
     (defalias 'gnutls-available-p 'ignore)
+    (defvar timer-list nil)
     (defalias 'w3-coding-system-for-mime-charset 'ignore)))
 
 (defun dgnushack-emacs-compile-defcustom-p ()
diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index eca4deb..6c3ad01 100644
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -4535,7 +4535,8 @@ commands:
 	(current-buffer)))))
 
 (defun gnus-article-stop-animations ()
-  (dolist (timer timer-list)
+  (dolist (timer (and (boundp 'timer-list)
+		      timer-list))
     (when (eq (aref timer 5) 'image-animate-timeout)
       (cancel-timer timer))))
 

-----------------------------------------------------------------------
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/dgnushack.el |    1 +
 lisp/gnus-art.el  |    3 ++-
 3 files changed, 5 insertions(+), 1 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