xemacs-beta: lisp/prim/about.el comparison

comparison lisp/prim/about.el @ 48:56c54cf7c5b6 r19-16b90

Import from CVS: tag r19-16b90

author	cvs
date	Mon, 13 Aug 2007 08:56:04 +0200
parents	8d2a9b52c682
children	ee648375d8d6

comparison

equal deleted inserted replaced

-:11c6df210d7f
+:56c54cf7c5b6
 (set (make-local-variable 'tab-width) 8)
 (setq buffer-read-only t)
 (view-mode nil 'kill-buffer)		;; assume the new view-less
 (let* ((buffer-read-only nil)
 (emacs-short-version (concat emacs-major-version "." emacs-minor-version))
-(emacs-about-version (format "version %s; March 1997" emacs-short-version))
+(emacs-about-version (format "version %s; August 1997" emacs-short-version))
 	 (indent-tabs-mode t)
 	 )
 (erase-buffer)
 (insert "\n")
 (indent-to (startup-center-spaces xemacs-logo))
 	(due to firewalls) in order to work correctly.\n\n\t")
 (insert "XEmacs is the result of the time and effort of many people.
 	The developers responsible for the " emacs-short-version " release are:
-		 * ") (about-xref "Steve Baur" 'steve "Find out more about Steve Baur") (insert "  <steve@altair.xemacs.org>
+		 * ") (about-xref "Vin Shelton" 'vin "Find out more about Vin Shelton") (insert "  <acs@acm.org>
+* ") (about-xref "Steve Baur" 'steve "Find out more about Steve Baur") (insert "  <steve@altair.xemacs.org>
 		 * ") (about-xref "Martin Buchholz" 'mrb "Find out more about Martin Buchholz") (insert "  <mrb@eng.sun.com>
 		 * ") (about-xref "And many other contributors..." 'others "Read about the legion of XEmacs hackers") (insert "
 	Chuck Thompson was Mr. XEmacs from 19.11 through 19.14.  Ben Wing
 (save-excursion
 (set-buffer (get-buffer-create "About XEmacs"))
 (toggle-read-only 0)
 (let ((rest (if who-to-load (list who-to-load)
-		  '(steve mrb cthomp wing stig jwz mly vladimir baw piper bw wmperry kyle larsi jens)))
+		  '(steve mrb cthomp wing stig jwz mly vladimir baw piper bw wmperry kyle larsi jens vin)))
 	  (got-error nil))
 (while rest
 	(let* ((who (car rest))
 	       (who-xpm (expand-file-name
 			 (concat (symbol-name who)
 (w3-python   . "http://www.python.org/ftp/emacs/")
 (w3-infodock . "http://www.infodock.com")
 (w3-kyle     . "http://www.wonderworks.com/kyle/")
 (w3-larsi    . "http://www.ifi.uio.no/~larsi/")
 (w3-hrvoje   . "ftp://gnjilux.cc.fer.hr/pub/unix/util/wget/")
+(w3-upa      . "http://www.upa.org")
 ;; add more here
 )
 "Mappings between xref symbols and URLs")
 (defun about-xemacs-xref ()
 			       ((eq xref 'steve) "About Steve Baur")
 			       ((eq xref 'mrb) "About Martin Buchholz")
 			       ((eq xref 'kyle) "About Kyle Jones")
 			       ((eq xref 'larsi) "About Lars Magne Ingebrigtsen")
 			       ((eq xref 'jens) "About Jens Lautenbacher")
+			       ((eq xref 'vin) "About Vin Shelton")
 			       ((eq xref 'others) "About Everyone")
 			       ((eq xref 'features) "New XEmacs Features")
 			       ((eq xref 'history) "XEmacs History")
 			       (t (error "Can't follow xref: %s" xref))
 			       )))
 	  (about-face "Steve Baur" 'bold)
 	  (insert " <steve@altair.xemacs.org>
 	Steve took over the maintenance of XEmacs in November of 1996
 	(it seemed like a good idea at the time ...).  In real life he is a
-	network administrator and Unix systems programmer for Miranova
+	network administrator for Calag.com, Inc.  A small ISP in central
-	Systems, Inc.
+California.  His main hobby while not maintaining XEmacs or working
+is ... you have got to be kidding ...")
-	Steve's main contributions to XEmacs have been reviving the FAQ,
-	testing and integrating patches, tracking down and fixing bugs, and
-	answering hundreds of questions on Usenet.")
 	  (insert "\n\n\tClick ")
 	  (about-xref "here" prev-page "Return to previous page")
 	  (insert " to go back to the previous page.\n")
 	  )
 	computers (and graphics). But because I have no deadline for
 	the exams and XEmacs betas are released at a high rate this
 	may take some time...")
 	  (insert "\n\n\tClick ")
+	  (about-xref "here" prev-page "Return to previous page")
+	  (insert " to go back to the previous page.\n")
+	  )
+	 ((eq xref 'vin)
+	  (about-face "Vin Shelton" 'bold)
+	  (insert " <acs@acm.org>
+Vin maintains the XEmacs patch pages in order to bring ") (about-face "you" 'italic) (insert " a more
+stable XEmacs.  (Actually, he does it 'cause it's fun and he's been
+using emacs for a long, long time.)  Vin also contributed the detached
+minibuffer code as well as a few minor enhancements to the menubar
+options.
+I own and operate my own consulting firm, EtherSoft.  Shhh, don't
+tell anyone, but it's named after an Ultimate team I used to play
+with in Austin, Texas - the Ether Bunnies.  I'm getting too old
+to play competitive Ultimate any more, so now I've gotten roped
+into serving on the board of directors of the Ultimate Players
+Association.  See ")
+(about-xref "http://www.upa.org/" 'w3-upa "Visit the UPA homepage")
+	  (insert ".\n\n\tClick ")
 	  (about-xref "here" prev-page "Return to previous page")
 	  (insert " to go back to the previous page.\n")
 	  )
 	 ((eq xref 'others)
 	  physics) done.  After that (and all the remaining exams) I'm
 	  looking forward to make a living out of my hobbies --
 	  computers (and graphics). But because I have no deadline for
 	  the exams and XEmacs betas are released at a high rate this
 	  may take some time...
+	") (about-xref "Vin Shelton" 'vin "Find out more about Vin Shelton") (insert " <acs@acm.org>
+	  Vin maintains the XEmacs patch pages.  Vin also contributed the
+	  detached minibuffer code, as well as a few minor enhancements to
+	  the menubar options.
 	Darrell Kindred <Darrell.Kindred@cmu.edu>
 	  Unofficial maintainer of the xemacs-beta list of extant
 	  bugs and contributor of an extraordinary number of
 	  important bug fixes, many of them in areas that neither

Mercurial > hg > xemacs-beta

comparison lisp/prim/about.el @ 48:56c54cf7c5b6 r19-16b90