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 f6c1651ce2cd31b2b067f7898bfbb3f0907113ea..ea81a60ad4bce4fae78763a80818102d14a569b4 100644 (file)
--- 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)