XEmacs 21.4.15
[chise/xemacs-chise.git.1] / lisp / about.el
index 635b2a1..3d1d5af 100644 (file)
 
 (defvar about-current-release-maintainers
   ;; this list should not necessarily be in sorted order.
-  '(turnbull adrian ben hniksic jason martin piper sperber youngs))
+  '(vin turnbull adrian ben martin piper sperber youngs))
 
 (defvar about-other-current-hackers
   ;; to sort this list or the one below, use:
   ;; M-x sort-regexp-fields RET [a-z]+ RET \(.*\) RET
-  '(aj alastair cgw craig daiki dan dv fabrice golubev gunnar hisashi
-       jan jareth jmiller jonathan kazz kirill larsi morioka mta ograf
-       olivier oscar pittman tomonori tuck vin wmperry yoshiki))
+  '(aj alastair cgw craig daiki dan dv fabrice golubev gunnar hisashi hniksic
+       jan jareth jmiller jason jonathan kazz kirill larsi morioka mta ograf
+       olivier oscar pittman tomonori tuck wmperry yoshiki))
 
 (defvar about-once-and-future-hackers
   '(ajc baw bw chr cthomp darrylo devin dkindred dmoore eb hbs hmuller
                   :format "%t"
                   :tag-glyph xemacs-logo)
     (widget-insert "\n")
-    (let* ((emacs-short-version (format "%d.%d"
+    (let* ((emacs-short-version (format "%d.%d.%d"
                                        emacs-major-version
-                                       emacs-minor-version))
-          (emacs-about-version (format "version %s; April 2001"
-                                       emacs-short-version)))
+                                       emacs-minor-version
+                                       emacs-patch-level))
+          (emacs-about-version (format "version %s; %s %s"
+                                       emacs-short-version
+                                       (cdr (assoc (substring emacs-build-time
+                                                              4 7)
+                                                   '(("Jan" . "January")
+                                                     ("Feb" . "February")
+                                                     ("Mar" . "March")
+                                                     ("Apr" . "April")
+                                                     ("May" . "May")
+                                                     ("Jun" . "June")
+                                                     ("Jul" . "July")
+                                                     ("Aug" . "August")
+                                                     ("Sep" . "September")
+                                                     ("Oct" . "October")
+                                                     ("Nov" . "November")
+                                                     ("Dec" . "December"))))
+                                       (substring emacs-build-time -4))))
       (widget-insert (about-center emacs-about-version))
       (widget-create 'link :help-echo "What's new in XEmacs"
                     :action 'about-news
@@ -1288,7 +1304,7 @@ Assistant Professor of Biostatistics at the University of Washington
 and the Fred Hutchinson Cancer Research Center.
 
 See ")
-     (about-url-link 'rossini nil "Visit Anothony's home page")
+     (about-url-link 'rossini nil "Visit Anthony's home page")
      (widget-insert ".\n"))
     (slb
      (widget-insert "\
@@ -1347,14 +1363,12 @@ Stephen lives with his Japanese wife and children in Tsukuba, Japan,
 where he is a professor of economics at the University of Tsukuba.\n"))
     (vin
      (widget-insert "\
-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-url-link 'vin nil "Visit the UPA homepage")
-     (widget-insert ".\n"))
+I'm a software engineer and manager for Teradyne in Boston.  I used
+to play a lot of Ultimate - see ")
+     (about-url-link 'vin nil "Visit the Ultimate Players Association homepage")
+     (widget-insert " for more details.
+Nowadays I'm a family man, so I spend a lot of time with my wife,
+Becky, and my son, Noah.\n"))
     (vladimir
      (widget-insert "\
 Former technical lead for XEmacs at Sun.  He is now writing a book on
@@ -1759,12 +1773,11 @@ Responsible for getting the current release of XEmacs out the
 door.\n"))
     (vin
      (widget-insert "\
-Vin helps maintain the older, more mature (read: moldy) versions of
-XEmacs.  Vin maintains the XEmacs patch pages in order to bring 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.\n"))
+Vin maintains the stable version of XEmacs.  This involves reviewing
+a lot of other peoples' patches and testing and applying them.
+He also gets to generate his own patches from time to time.  Being
+release manager is a fun way to contribute to the XEmacs project.
+Write me at acs@xemacs.org if you're interested in learning more.\n"))
     (vladimir
      (widget-insert "\
 Former technical lead for XEmacs at Sun.\n"))