[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] trunk r113809: lisp/gnus/mm-decode.el (mm-display-external
From: |
Katsumi Yamaoka |
Subject: |
[Emacs-diffs] trunk r113809: lisp/gnus/mm-decode.el (mm-display-external): Try to delete temporary files by using a 1-min. timer |
Date: |
Mon, 12 Aug 2013 01:03:39 +0000 |
User-agent: |
Bazaar (2.6b2) |
------------------------------------------------------------
revno: 113809
revision-id: address@hidden
parent: address@hidden
committer: Katsumi Yamaoka <address@hidden>
branch nick: trunk
timestamp: Mon 2013-08-12 01:03:33 +0000
message:
lisp/gnus/mm-decode.el (mm-display-external): Try to delete temporary files
by using a 1-min. timer
modified:
lisp/gnus/ChangeLog changelog-20091113204419-o5vbwnq5f7feedwu-1433
lisp/gnus/mm-decode.el
mmdecode.el-20091113204419-o5vbwnq5f7feedwu-1971
=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog 2013-08-09 08:05:56 +0000
+++ b/lisp/gnus/ChangeLog 2013-08-12 01:03:33 +0000
@@ -1,3 +1,8 @@
+2013-08-12 Katsumi Yamaoka <address@hidden>
+
+ * mm-decode.el (mm-display-external): Try to delete temporary files by
+ using a 1-min. timer.
+
2013-08-09 Katsumi Yamaoka <address@hidden>
* mm-decode.el (mm-temp-files-to-be-deleted, mm-temp-files-cache-file):
=== modified file 'lisp/gnus/mm-decode.el'
--- a/lisp/gnus/mm-decode.el 2013-08-09 09:17:25 +0000
+++ b/lisp/gnus/mm-decode.el 2013-08-12 01:03:33 +0000
@@ -1021,6 +1021,13 @@
(buffer buffer)
(command command)
(handle handle))
+ (run-at-time
+ 60.0 nil
+ (lambda ()
+ (ignore-errors
+ (delete-file file))
+ (ignore-errors
+ (delete-directory (file-name-directory file)))))
(lambda (process state)
(when (eq (process-status process) 'exit)
(when (buffer-live-p outbuf)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] trunk r113809: lisp/gnus/mm-decode.el (mm-display-external): Try to delete temporary files by using a 1-min. timer,
Katsumi Yamaoka <=