XEmacs 21.4.19 (Constant Variable).
[chise/xemacs-chise.git.1] / lisp / about.el
index 635b2a1..e6e7d58 100644 (file)
@@ -1,6 +1,6 @@
 ;;; about.el --- the About The Authors page (shameless self promotion).
 
-;; Copyright (c) 1997 Free Software Foundation, Inc.
+;; Copyright (c) 1997, 2005 Free Software Foundation, Inc.
 ;; Copyright (C) 2001 Ben Wing.
 
 ;; Keywords: extensions
     (hobley   "David hobley"      "hobley@xemacs.org")
     (jan      "Jan Vroonhof"      "jan@xemacs.org")
     (jareth   "Jareth Hein"       "jareth@xemacs.org")
+    (jas      "Simon Josefsson"   "simon@xemacs.org")
     (jason    "Jason R. Mastaler" "jason@xemacs.org")
     (jens     "Jens Lautenbacher" "jens@xemacs.org")
     (jmiller  "Jeff Miller"       "jmiller@xemacs.org")
 
 (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
-       hobley jens juhp jwz kyle marcpa mcook mly ograf pelegri pez
+       hobley jas jens juhp jwz kyle marcpa mcook mly ograf pelegri pez
        rickc rose rossini slb stig stigb thiessel vladimir))
 
 ;; The CAR of alist elements is a valid argument to `about-url-link'.
     (dv         . "http://www.lrde.epita.fr/~didier/")
     (fabrice    . "http://www.ese-metz.fr/~popineau/")
     (fptex      . "http://www.fptex.org/")
+    (jas       . "http://josefsson.org/")
     (jason      . "http://www.mastaler.com/")
     (juhp       . "http://www.01.246.ne.jp/~juhp/")
     (jwz        . "http://www.jwz.org/")
                   :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
@@ -1043,6 +1061,25 @@ portable, implements a language, includes a non-trivial bit of
 graphics and a garbage collector, but is multithreaded to boot!
 Unfortunately his XEmacs time is directly limited by the amount of
 traffic on the M40.\n"))
+    (jas
+     (widget-insert "\
+
+Simon lives in Stockholm where he has discovered that computers
+can be a powerful procrastinating tool.  Combined with a
+frustrating desire to see computers simply work, he spends most
+of his time complaining.  Occasionally he rises up to the task
+and produces something that others may complain about, which
+brings him increased satisfaction with every bug report.  Today
+he is pretending to be a network security guy, with a preference
+for standardization issues, while secretly longing to start a
+cafe or becoming a theoretical computer scientist.  His personal
+interest is literature, and to some extent traveling, but will
+try anything for fun, such as juggling, skiing, wine, and
+long-distance biking.
+
+See: ")
+     (about-url-link 'jas nil "Visit Simon's homepage")
+     (widget-insert ".\n"))
     (jareth
      (widget-insert "\
 Jareth Hein is a mountain boy who abandoned his home state of Colorado
@@ -1288,7 +1325,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 +1384,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
@@ -1595,6 +1630,14 @@ of the XEmacs custom subsystem and gnuserv.\n"))
      (widget-insert "\
 Owner of cvs.xemacs.org, the machine that holds the XEmacs CVS
 repository, and author of some of the graphics code in XEmacs.\n"))
+    (jas
+     (widget-insert "\
+Wrote and/or integrated several packages for Gnus, such as
+support for IMAP, Sieve, format=flowed, GnuTLS, S/MIME, and PGP.
+Irregularly synchronizes lisp code between Emacs and XEmacs.  He
+maintains the mail-lib, sieve, sasl, pgg and ecrypto XEmacs
+packages.  Operates the secondary DNS and mail server for
+xemacs.org.\n"))
     (jason
      (widget-insert "\
 Beta tester, manager of the various XEmacs mailing lists and binary
@@ -1759,12 +1802,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"))