From 12243266aa3323038d3294dc0d3c4de9985c439d Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 8 Jan 1994 12:46:53 +0000 Subject: [PATCH] (gnus-group-list-all-groups): Display a message in the echo area. --- lisp/gnus.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) 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 -;; 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." -- 2.39.5