Mercurial > emacs
changeset 5510:d3e04700d190
(gnus-group-list-all-groups): Display a message in the echo area.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sat, 08 Jan 1994 12:46:53 +0000 |
parents | 5d907d4216ce |
children | b4da518d3ec7 |
files | lisp/=gnus.el |
diffstat | 1 files changed, 4 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/=gnus.el Sat Jan 08 12:44:48 1994 +0000 +++ b/lisp/=gnus.el Sat Jan 08 12:46:53 1994 +0000 @@ -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 @@ (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."