[gnus git] branch master updated: m0-5-138-g5365de3 =1= gnus-art.el (gnus-article-browse-delete-temp-files): Fix previous commit
Katsumi Yamaoka <[email protected]>
| Newsgroups | gmane.emacs.gnus.cvs |
|---|---|
| Message-ID | <[email protected]> |
via 5365de3680bcee2f3eefd8072cc7e19eedf84165 (commit)
from 37699e6828e24e41525ee05ffa5691e68e2a2120 (commit)
- Log -----------------------------------------------------------------
commit 5365de3680bcee2f3eefd8072cc7e19eedf84165
Author: Katsumi Yamaoka <[email protected]>
Date: Tue Sep 25 23:57:25 2012 +0000
gnus-art.el (gnus-article-browse-delete-temp-files): Fix previous commit
diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index 435a103..6c827e0 100644
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -2759,14 +2759,12 @@ summary buffer."
(progn
(or how (setq how gnus-article-browse-delete-temp))
(if (eq how 'ask)
- (let* ((files (length gnus-article-browse-html-temp-list))
- (ans (gnus-y-or-n-p
+ (let ((files (length gnus-article-browse-html-temp-list)))
+ (or (gnus-y-or-n-p
(if (= files 1)
"Delete the temporary HTML file? "
- (format
- "Delete all %s temporary HTML files? "
- files)))))
- (or ans
+ (format "Delete all %s temporary HTML files? "
+ files)))
(setq gnus-article-browse-html-temp-list nil)))
how)))
(dolist (file gnus-article-browse-html-temp-list)
-----------------------------------------------------------------------
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/gnus-art.el | 14 ++++++--------
1 files changed, 6 insertions(+), 8 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