From: Dave Love <fx@gnu.org>
Date: Wed, 8 Nov 2000 23:39:05 +0000 (+0000)
Subject: 2000-11-09  Lars Magne Ingebrigtsen  <larsi@gnus.org>
X-Git-Tag: emacs-pretest-21.0.90~200
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=78f164bac1d6f25a3b6708646317cc8c09beb48f;p=emacs.git

2000-11-09  Lars Magne Ingebrigtsen  <larsi@gnus.org>

	* gnus-start.el (gnus-read-active-file, gnus-activate-group):
	Issue message on quit.

2000-11-09  ShengHuo ZHU  <zsh@cs.rochester.edu>

	* gnus-start.el: Remove gnus-xemacs.
---

diff --git a/lisp/gnus/gnus-start.el b/lisp/gnus/gnus-start.el
index f6c1651ce2c..ea81a60ad4b 100644
--- a/lisp/gnus/gnus-start.el
+++ b/lisp/gnus/gnus-start.el
@@ -1385,7 +1385,9 @@ newsgroup."
 	 (condition-case ()
 	     (inline (gnus-request-group group dont-check method))
 	   ;;(error nil)
-	   (quit nil))
+	   (quit
+	    (message "Quit activating %s" group)
+	    nil))
 	 (setq active (gnus-parse-active))
 	 ;; If there are no articles in the group, the GROUP
 	 ;; command may have responded with the `(0 . 0)'.  We
@@ -1738,7 +1740,9 @@ newsgroup."
 	      (gnus-read-active-file-1 method force)
 	    ;; We catch C-g so that we can continue past servers
 	    ;; that do not respond.
-	    (quit nil)))))))
+	    (quit
+	     (message "Quit reading the active file")
+	     nil)))))))
 
 (defun gnus-read-active-file-1 (method force)
   (let (where mesg)