Mercurial > hg > xemacs-beta

comparison lisp/about.el @ 438:84b14dcb0985 r21-2-27

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-27
author cvs
date Mon, 13 Aug 2007 11:32:25 +0200
parents 3a7e78e1142d
children 8de8e3f6228a
comparison
equal deleted inserted replaced
437:e2a4e8b94b82 438:84b14dcb0985
54 ;; 54 ;;
55 ;; If you add to this list, you'll want to update 55 ;; If you add to this list, you'll want to update
56 ;; `about-maintainer-info' (and maybe `about-hackers'. 56 ;; `about-maintainer-info' (and maybe `about-hackers'.
57 (defvar xemacs-hackers 57 (defvar xemacs-hackers
58 '((ajc "Andrew Cosgriff" "ajc@bing.wattle.id.au") 58 '((ajc "Andrew Cosgriff" "ajc@bing.wattle.id.au")
59 (aj "Andreas Jaeger" "aj@suse.de")
59 (baw "Barry Warsaw" "bwarsaw@python.org") 60 (baw "Barry Warsaw" "bwarsaw@python.org")
60 (bw "Bob Weiner" "weiner@beopen.com") 61 (bw "Bob Weiner" "weiner@beopen.com")
61 (chr "Christian Nybø" "chr@mediascience.no") 62 (chr "Christian Nybø" "chr@mediascience.no")
62 (cthomp "Chuck Thompson" "cthomp@xemacs.org") 63 (cthomp "Chuck Thompson" "cthomp@xemacs.org")
63 (dmoore "David Moore" "dmoore@ucsd.edu") 64 (dmoore "David Moore" "dmoore@ucsd.edu")
984 Christian is a student at the Norwegian School of Economics and 985 Christian is a student at the Norwegian School of Economics and
985 Business Administration in Bergen, Norway. He used to work for an 986 Business Administration in Bergen, Norway. He used to work for an
986 internet startup called New Media Science, doing scripting and 987 internet startup called New Media Science, doing scripting and
987 violation of HTML DTD's. After graduation, spring 1999, he'll be 988 violation of HTML DTD's. After graduation, spring 1999, he'll be
988 looking for a job involving lisp programming, French and Russian.") 989 looking for a job involving lisp programming, French and Russian.")
990 (widget-insert ".\n"))
991 (aj
992 (widget-insert "\
993 In the XEmacs team I'm responsible for the packages which means mainly
994 applying patches and packaging the packages.
995
996 I'm a software developer working for the SuSE Labs of the Linux
997 distributor SuSE. My main task is to improve the GNU C library.")
989 (widget-insert ".\n")) 998 (widget-insert ".\n"))
990 )) 999 ))
991 1000
992 ;; Setup the buffer for a maintainer. 1001 ;; Setup the buffer for a maintainer.
993 (defun about-maintainer (widget &optional event) 1002 (defun about-maintainer (widget &optional event)
1195 Originator and maintainer of the gnus.org domain.\n") 1204 Originator and maintainer of the gnus.org domain.\n")
1196 (about-show-linked-info 'jmiller "\ 1205 (about-show-linked-info 'jmiller "\
1197 Beta tester and last hacker of calendar.\n") 1206 Beta tester and last hacker of calendar.\n")
1198 (about-show-linked-info 'chr "\ 1207 (about-show-linked-info 'chr "\
1199 Maintainer of the XEmacs FAQ and proud author of `zap-up-to-char'.\n") 1208 Maintainer of the XEmacs FAQ and proud author of `zap-up-to-char'.\n")
1209 (about-show-linked-info 'aj "\
1210 `Package Patch Tender', beta tester and GNU libc developer.\n")
1211
1200 (flet ((print-short (name addr &optional shortinfo) 1212 (flet ((print-short (name addr &optional shortinfo)
1201 (concat (about-with-face name 'italic) 1213 (concat (about-with-face name 'italic)
1202 (about-tabs name) 1214 (about-tabs name)
1203 "<" addr ">\n" 1215 "<" addr ">\n"
1204 (if shortinfo (concat shortinfo "\n") "")))) 1216 (if shortinfo (concat shortinfo "\n") ""))))
1261 above. We couldn't have done it without them.\n\n" 1273 above. We couldn't have done it without them.\n\n"
1262 (print-short "Nagi M. Aboulenein" "aboulene@ponder.csci.unt.edu") 1274 (print-short "Nagi M. Aboulenein" "aboulene@ponder.csci.unt.edu")
1263 (print-short "Per Abrahamsen" "abraham@dina.kvl.dk") 1275 (print-short "Per Abrahamsen" "abraham@dina.kvl.dk")
1264 (print-short "Gary Adams" "gra@zeppo.East.Sun.COM") 1276 (print-short "Gary Adams" "gra@zeppo.East.Sun.COM")
1265 (print-short "Gennady Agranov" "agranov@csa.CS.Technion.Ac.IL") 1277 (print-short "Gennady Agranov" "agranov@csa.CS.Technion.Ac.IL")
1266 (print-short "Adrian Aichner" "aichner@ecf.teradyne.com") 1278 (print-short "Adrian Aichner" "adrian@xemacs.org")
1267 (print-short "Mark Allender" "allender@vnet.IBM.COM") 1279 (print-short "Mark Allender" "allender@vnet.IBM.COM")
1268 (print-short "Stephen R. Anderson" "sra@bloch.ling.yale.edu") 1280 (print-short "Stephen R. Anderson" "sra@bloch.ling.yale.edu")
1269 (print-short "Butch Anton" "butch@zaphod.uchicago.edu") 1281 (print-short "Butch Anton" "butch@zaphod.uchicago.edu")
1270 (print-short "Fred Appelman" "Fred.Appelman@cv.ruu.nl") 1282 (print-short "Fred Appelman" "Fred.Appelman@cv.ruu.nl")
1271 (print-short "Erik \"The Pope\" Arneson" "lazarus@mind.net") 1283 (print-short "Erik \"The Pope\" Arneson" "lazarus@mind.net")
1358 (print-short "Tetsuya HOYANO" "hoyano@ari.bekkoame.or.jp") 1370 (print-short "Tetsuya HOYANO" "hoyano@ari.bekkoame.or.jp")
1359 (print-short "David Hughes" "djh@harston.cv.com") 1371 (print-short "David Hughes" "djh@harston.cv.com")
1360 (print-short "Tudor Hulubei" "tudor@cs.unh.edu") 1372 (print-short "Tudor Hulubei" "tudor@cs.unh.edu")
1361 (print-short "Tatsuya Ichikawa" "ichikawa@hv.epson.co.jp") 1373 (print-short "Tatsuya Ichikawa" "ichikawa@hv.epson.co.jp")
1362 (print-short "Andrew Innes" "andrewi@harlequin.co.uk") 1374 (print-short "Andrew Innes" "andrewi@harlequin.co.uk")
1363 (print-short "Andreas Jaeger" "aj@arthur.rhein-neckar.de")
1364 (print-short "Markku Jarvinen" "Markku.Jarvinen@simpukka.funet.fi") 1375 (print-short "Markku Jarvinen" "Markku.Jarvinen@simpukka.funet.fi")
1365 (print-short "Robin Jeffries" "robin.jeffries@sun.com") 1376 (print-short "Robin Jeffries" "robin.jeffries@sun.com")
1366 (print-short "Philip Johnson" "johnson@uhics.ics.Hawaii.Edu") 1377 (print-short "Philip Johnson" "johnson@uhics.ics.Hawaii.Edu")
1367 (print-short "J. Kean Johnston" "jkj@paradigm-sa.com") 1378 (print-short "J. Kean Johnston" "jkj@paradigm-sa.com")
1368 (print-short "John W. Jones" "jj@asu.edu") 1379 (print-short "John W. Jones" "jj@asu.edu")