[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/gnus/mm-decode.el,v
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/gnus/mm-decode.el,v |
Date: |
Tue, 09 Jan 2007 05:40:40 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Miles Bader <miles> 07/01/09 05:40:39
Index: mm-decode.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/gnus/mm-decode.el,v
retrieving revision 1.40
retrieving revision 1.41
diff -u -b -r1.40 -r1.41
--- mm-decode.el 16 Nov 2006 11:10:48 -0000 1.40
+++ mm-decode.el 9 Jan 2007 05:40:39 -0000 1.41
@@ -883,13 +883,21 @@
;; a vector in Emacs but is a list in XEmacs)
;; requires that it is lexically scoped.
(timer (run-at-time 2.0 nil 'ignore)))
+ (if (boundp 'itimer-list)
+ (lambda (process state)
+ (when (eq 'exit (process-status process))
+ (if (memq timer itimer-list)
+ (set-itimer-function timer fn)
+ (funcall fn))
+ (ignore-errors (eval fm))
+ (message "%s" done)))
(lambda (process state)
(when (eq 'exit (process-status process))
(if (memq timer timer-list)
(timer-set-function timer fn)
(funcall fn))
(ignore-errors (eval fm))
- (message "%s" done))))))
+ (message "%s" done)))))))
(mm-handle-set-external-undisplayer
handle (cons file buffer)))
(message "Displaying %s..." command))
- [Emacs-diffs] Changes to emacs/lisp/gnus/mm-decode.el,v,
Miles Bader <=