[gnu.emacs.gnus] GNUS startup message

mcgrath@paris.Berkeley.EDU (Roland McGrath) (03/20/89)

The following diff to gnus.el makes the GNUS startup message not look so
funny in big windows (like a 65-line X window).

*** gnus.el.~3~	Sun Mar 19 19:24:55 1989
--- gnus.el	Mon Mar 20 00:26:12 1989
***************
*** 867,875 ****
        )))
  
  (defun gnus-Group-startup-message ()
!   (insert "\n\n\n\n
! 			   GNUS Version 3.11
! 
  		 NNTP-based News Reader for GNU Emacs
  
  
--- 867,877 ----
        )))
  
  (defun gnus-Group-startup-message ()
!   (insert-char ?\n (/ (- (window-height) 14) 2))
!   (let ((fill-column 70))
! 	(insert "\nGNUS Version " (substring gnus-version 5))
! 	(center-line))
!   (insert "\n\n
  		 NNTP-based News Reader for GNU Emacs
  
  
--
	Roland McGrath
	Free Software Foundation, Inc.
roland@wheaties.ai.mit.edu, mit-eddie!wheaties.ai.mit.edu!roland