From: Katsumi Yamaoka Date: Wed, 7 Jan 2004 03:14:32 +0000 (+0000) Subject: Don't make unnecessary *Group* buffer when loading. X-Git-Url: http://cgit.sxemacs.org/?a=commitdiff_plain;h=968c443684b6736685e8524be26fc6d8cdd1237d;p=gnus Don't make unnecessary *Group* buffer when loading. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 5ef8b5572..05d634cb7 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,7 @@ 2004-01-07 Katsumi Yamaoka + * gnus.el: Don't make unnecessary *Group* buffer when loading. + * run-at-time.el (run-at-time-saved): Remove. (run-at-time): Doc fix. diff --git a/lisp/gnus.el b/lisp/gnus.el index c27b5f772..1512d0165 100644 --- a/lisp/gnus.el +++ b/lisp/gnus.el @@ -937,10 +937,10 @@ be set in `.emacs' instead." (eval-when (load) (let ((command (format "%s" this-command))) - (if (and (string-match "gnus" command) - (not (string-match "gnus-other-frame" command))) - (gnus-splash) - (gnus-get-buffer-create gnus-group-buffer)))) + (when (string-match "gnus" command) + (if (string-match "gnus-other-frame" command) + (gnus-get-buffer-create gnus-group-buffer) + (gnus-splash))))) ;;; Do the rest.