/[emacs]/emacs/lisp/gnus/gnus.el
ViewVC logotype

Diff of /emacs/lisp/gnus/gnus.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.27.2.2 by rsteib, Mon Aug 16 10:13:58 2004 UTC revision 1.27.2.3 by rsteib, Tue Aug 31 14:47:59 2004 UTC
# Line 940  be set in `.emacs' instead." Line 940  be set in `.emacs' instead."
940    
941  (eval-when (load)  (eval-when (load)
942    (let ((command (format "%s" this-command)))    (let ((command (format "%s" this-command)))
943      (if (and (string-match "gnus" command)      (when (string-match "gnus" command)
944               (not (string-match "gnus-other-frame" command)))        (if (string-match "gnus-other-frame" command)
945          (gnus-splash)            (gnus-get-buffer-create gnus-group-buffer)
946        (gnus-get-buffer-create gnus-group-buffer))))          (gnus-splash)))))
947    
948  ;;; Do the rest.  ;;; Do the rest.
949    

Legend:
Removed from v.1.27.2.2  
changed lines
  Added in v.1.27.2.3

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26