GNUS startup message

Article View: gnu.emacs.gnus

Article #778

#778

From: Roland McGrath
Date: Mon, 20 Mar 1989 08:26

32 lines
1215 bytes

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

Technical Details

Message-ID: <MCGRATH.89Mar20002642@paris.Berkeley.EDU>

Path: arc1-ca.pugleaf.net!utzoo!utgpu!watmath!uunet!tut.cis.ohio-state.edu!ucbvax!agate!paris.Berkeley.EDU!mcgrath

Show Full Headers

Complete Article Headers

Path: arc1-ca.pugleaf.net!utzoo!utgpu!watmath!uunet!tut.cis.ohio-state.edu!ucbvax!agate!paris.Berkeley.EDU!mcgrath
From: mcgrath@paris.Berkeley.EDU (Roland McGrath)
Newsgroups: gnu.emacs.gnus
Subject: GNUS startup message
Message-ID: <MCGRATH.89Mar20002642@paris.Berkeley.EDU>
Date: 20 Mar 89 08:26:42 GMT
Sender: usenet@agate.BERKELEY.EDU
Organization: University of California, Berkeley
Lines: 32