Index: ChangeLog
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/gnus/ChangeLog,v
retrieving revision 1.105
diff -u -r1.105 ChangeLog
--- ChangeLog	2 Jan 2008 10:55:35 -0000	1.105
+++ ChangeLog	12 Mar 2008 19:33:43 -0000
@@ -1,3 +1,8 @@
+2008-03-12  Ville Skyttä  <scop@xemacs.org>
+
+	* lisp/mm-decode.el (mm-display-external): Use `itimer-list' if
+	`timer-list' is not available.
+
 2008-01-02  Norbert Koch  <viteno@xemacs.org>
 
 	* Makefile (VERSION): XEmacs package 1.92 released.
Index: lisp/mm-decode.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/gnus/lisp/mm-decode.el,v
retrieving revision 1.10
diff -u -r1.10 mm-decode.el
--- lisp/mm-decode.el	5 Mar 2007 18:07:05 -0000	1.10
+++ lisp/mm-decode.el	12 Mar 2008 19:33:43 -0000
@@ -874,13 +874,17 @@
 					 nil))))
 			  ;; Message to be issued when the process exits.
 			  (done (format "Displaying %s...done" command))
+			  ;; `timer-list' in GNU Emacs, `itimer-list' in XEmacs
+			  (tlist (if (boundp 'timer-list)
+				     timer-list
+				   itimer-list))
 			  ;; In particular, the timer object (which is
 			  ;; a vector in Emacs but is a list in XEmacs)
 			  ;; requires that it is lexically scoped.
 			  (timer (run-at-time 2.0 nil 'ignore)))
 		       (lambda (process state)
 			 (when (eq 'exit (process-status process))
-			   (if (memq timer timer-list)
+			   (if (memq timer tlist)
 			       (timer-set-function timer fn)
 			     (funcall fn))
 			   (ignore-errors (eval fm))