* bug in gnus-summary-exit
@ 1998-09-15 19:03 朱胜火
0 siblings, 0 replies; only message in thread
From: 朱胜火 @ 1998-09-15 19:03 UTC (permalink / raw)
gnus-summary-exit complains when there is no article buffer.
Patch is attached.
--
Shenghuo ZHU(朱胜火)
----------------------------------------------------------------
diff -ru pgnus-0.31/lisp/ChangeLog pgnus-0.32pre1/lisp/ChangeLog
--- pgnus-0.31/lisp/ChangeLog Mon Sep 14 12:55:34 1998
+++ pgnus-0.32pre1/lisp/ChangeLog Tue Sep 15 14:46:31 1998
@@ -1,3 +1,8 @@
+Tue Sep 15 14:39:58 1998 Shenghuo ZHU <zsh@cs.rochester.edu>
+
+ * gnus-sum.el (gnus-summary-exit): Stop complaining about summary
+ exit without article buffer
+
Mon Sep 14 18:55:38 1998 Lars Magne Ingebrigtsen <larsi@menja.ifi.uio.no>
* gnus.el: Pterodactyl Gnus v0.31 is released.
diff -ru pgnus-0.31/lisp/gnus-sum.el pgnus-0.32pre1/lisp/gnus-sum.el
--- pgnus-0.31/lisp/gnus-sum.el Mon Sep 14 12:55:37 1998
+++ pgnus-0.32pre1/lisp/gnus-sum.el Tue Sep 15 14:38:03 1998
@@ -5104,8 +5104,10 @@
(if temporary
nil ;Nothing to do.
(save-excursion
- (set-buffer gnus-article-buffer)
- (mapcar 'mm-destroy-part gnus-article-mime-handles))
+ (if (condition-case nil
+ (set-buffer gnus-article-buffer)
+ (error nil))
+ (mapcar 'mm-destroy-part gnus-article-mime-handles)))
;; If we have several article buffers, we kill them at exit.
(unless gnus-single-article-buffer
(gnus-kill-buffer gnus-article-buffer)
^ permalink raw reply [flat|nested] only message in thread
only message in thread, other threads:[~1998-09-15 19:03 UTC | newest]
Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
1998-09-15 19:03 bug in gnus-summary-exit 朱胜火
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).