From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 8 Jan 1994 12:46:53 +0000 (+0000)
Subject: (gnus-group-list-all-groups): Display a message in the echo area.
X-Git-Tag: emacs-19.34~10341
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=12243266aa3323038d3294dc0d3c4de9985c439d;p=emacs.git

(gnus-group-list-all-groups): Display a message in the echo area.
---

diff --git a/lisp/gnus.el b/lisp/gnus.el
index 73e91237ff7..bddedb3bd04 100644
--- a/lisp/gnus.el
+++ b/lisp/gnus.el
@@ -2,7 +2,7 @@
 ;; Copyright (C) 1987, 1988, 1989, 1990, 1993 Free Software Foundation, Inc.
 
 ;; Author: Masanobu UMEDA <umerin@mse.kyutech.ac.jp>
-;; Version: $Header: /home/fsf/rms/e19/lisp/RCS/gnus.el,v 1.30 1993/11/17 13:41:50 rms Exp $
+;; Version: $Header: /home/fsf/rms/e19/lisp/RCS/gnus.el,v 1.31 1993/12/23 04:58:26 rms Exp rms $
 ;; Keywords: news
 
 ;; This file is part of GNU Emacs.
@@ -1561,7 +1561,9 @@ New newsgroup is added to .newsrc automatically."
 (defun gnus-group-list-all-groups ()
   "List all of newsgroups in the Newsgroup buffer."
   (interactive)
-  (gnus-group-list-groups t))
+  (message "Listing all groups...")
+  (gnus-group-list-groups t)
+  (message "Listing all groups...done"))
 
 (defun gnus-group-get-new-news ()
   "Get newly arrived articles. In fact, read the active file again."