Mercurial > hg > xemacs-beta
comparison lisp/about.el @ 310:851ff35f137f r21-0b53
Import from CVS: tag r21-0b53
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:43:28 +0200 |
parents | 33bdb3d4b97f |
children | d1b52dcaa789 |
comparison
equal
deleted
inserted
replaced
309:7f3a3eb0558c | 310:851ff35f137f |
---|---|
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 (baw "Barry Warsaw" "bwarsaw@python.org") | 59 (baw "Barry Warsaw" "bwarsaw@python.org") |
60 (bw "Bob Weiner" "weiner@altrasoft.com") | 60 (bw "Bob Weiner" "weiner@altrasoft.com") |
61 (chr "Christian Nybø" "chr@mediascience.no") | |
61 (cthomp "Chuck Thompson" "cthomp@xemacs.org") | 62 (cthomp "Chuck Thompson" "cthomp@xemacs.org") |
62 (dmoore "David Moore" "dmoore@ucsd.edu") | 63 (dmoore "David Moore" "dmoore@ucsd.edu") |
63 (dkindred "Darrell Kindred" "dkindred@cmu.edu") | 64 (dkindred "Darrell Kindred" "dkindred@cmu.edu") |
64 (dv "Didier Verna" "verna@inf.enst.fr") | 65 (dv "Didier Verna" "verna@inf.enst.fr") |
65 (hniksic "Hrvoje Niksic" "hniksic@srce.hr") | 66 (hniksic "Hrvoje Niksic" "hniksic@srce.hr") |
85 (vin "Vin Shelton" "acs@acm.org") | 86 (vin "Vin Shelton" "acs@acm.org") |
86 (sperber "Michael Sperber" "sperber@informatik.uni-tuebingen.de") | 87 (sperber "Michael Sperber" "sperber@informatik.uni-tuebingen.de") |
87 (slb "SL Baur" "steve@xemacs.org") | 88 (slb "SL Baur" "steve@xemacs.org") |
88 (stig "Jonathan Stigelman" "stig@hackvan.com") | 89 (stig "Jonathan Stigelman" "stig@hackvan.com") |
89 (stigb "Stig Bjorlykke" "stigb@tihlde.hist.no") | 90 (stigb "Stig Bjorlykke" "stigb@tihlde.hist.no") |
90 (thiessel "Marcus Thiessel" "thiessel@rhrk.uni-kl.de") | 91 (thiessel "Marcus Thiessel" "marcus_thiessel@hp.com") |
91 (vladimir "Vladimir Ivanovic" "vladimir@mri.com") | 92 (vladimir "Vladimir Ivanovic" "vladimir@mri.com") |
92 (wing "Ben Wing" "ben@xemacs.org") | 93 (wing "Ben Wing" "ben@xemacs.org") |
93 (wmperry "William Perry" "wmperry@aventail.com")) | 94 (wmperry "William Perry" "wmperry@aventail.com")) |
94 "Alist of XEmacs hackers.") | 95 "Alist of XEmacs hackers.") |
95 | 96 |
99 (defvar about-url-alist | 100 (defvar about-url-alist |
100 '((ajc . "http://www-personal.monash.edu.au/~ajc/") | 101 '((ajc . "http://www-personal.monash.edu.au/~ajc/") |
101 (altrasoft . "http://www.altrasoft.com/") | 102 (altrasoft . "http://www.altrasoft.com/") |
102 (baw . "http://www.python.org/~bwarsaw/") | 103 (baw . "http://www.python.org/~bwarsaw/") |
103 (cc-mode . "http://www.python.org/ftp/emacs/") | 104 (cc-mode . "http://www.python.org/ftp/emacs/") |
105 (chr . "http://www.xemacs.org/faq/") | |
104 (dkindred . "http://www.cs.cmu.edu/People/dkindred/me.html") | 106 (dkindred . "http://www.cs.cmu.edu/People/dkindred/me.html") |
105 (dmoore . "http://oj.egbt.org/dmoore/") | 107 (dmoore . "http://oj.egbt.org/dmoore/") |
106 (jason . "http://www.mastaler.com/") | 108 (jason . "http://www.mastaler.com/") |
107 (juhp . "http://www.kurims.kyoto-u.ac.jp/~petersen/") | 109 (juhp . "http://www.kurims.kyoto-u.ac.jp/~petersen/") |
108 (jwz . "http://people.netscape.com/jwz/") | 110 (jwz . "http://people.netscape.com/jwz/") |
805 He has a page at ") | 807 He has a page at ") |
806 (about-url-link 'dmoore "Visit David's home page") | 808 (about-url-link 'dmoore "Visit David's home page") |
807 (widget-insert ".\n")) | 809 (widget-insert ".\n")) |
808 (thiessel | 810 (thiessel |
809 (widget-insert "\ | 811 (widget-insert "\ |
810 On May 1, 1996 he started working at University of Kaiserslautern in | 812 Worked at University of Kaiserslautern where he took part in the |
811 the field of computer aided analog circuit design. His | 813 development and design of a CAD framework for analog integrated |
812 responsibilities include the development and design of a CAD-Tool for | 814 circuits with special emphasis on distributed software concepts. He |
813 analog integrated circuits with special emphasis on distributed | 815 has now joined HP as technical consultant. |
814 software concepts. | 816 |
815 | 817 For XEmacs he does beta testing and tries to take care of XEmacs |
816 When all the daily hacking is done he tries to take care of XEmacs | |
817 website at ") | 818 website at ") |
818 (about-url-link 'xemacs "Visit XEmacs web site") | 819 (about-url-link 'xemacs "Visit XEmacs web site") |
819 (widget-insert ".\n")) | 820 (widget-insert ".\n")) |
820 (sperber | 821 (sperber |
821 (widget-insert "\ | 822 (widget-insert "\ |
971 time tinkering with Linux and hacking on XEmacs and loves it when he finds | 972 time tinkering with Linux and hacking on XEmacs and loves it when he finds |
972 new cool features in either. When he's not doing that, he enjoys downhill | 973 new cool features in either. When he's not doing that, he enjoys downhill |
973 skiing, puzzles, and sci-fi. Jeff is also really interested in classical | 974 skiing, puzzles, and sci-fi. Jeff is also really interested in classical |
974 Roman history and enjoys making trips to Italy, where he was born, and | 975 Roman history and enjoys making trips to Italy, where he was born, and |
975 seeing the sights") | 976 seeing the sights") |
977 (widget-insert ".\n")) | |
978 (chr | |
979 (widget-insert "\ | |
980 Maintainer of the XEmacs FAQ and proud author of `zap-up-to-char'. | |
981 | |
982 Christian is a student at the Norwegian School of Economics and | |
983 Business Administration in Bergen, Norway. He used to work for an | |
984 internet startup called New Media Science, doing scripting and | |
985 violation of HTML DTD's. After graduation, spring 1999, he'll be | |
986 looking for a job involving lisp programming, French and Russian.") | |
976 (widget-insert ".\n")) | 987 (widget-insert ".\n")) |
977 )) | 988 )) |
978 | 989 |
979 ;; Setup the buffer for a maintainer. | 990 ;; Setup the buffer for a maintainer. |
980 (defun about-maintainer (widget &optional event) | 991 (defun about-maintainer (widget &optional event) |
1016 :value who) | 1027 :value who) |
1017 (widget-insert (about-tabs name) | 1028 (widget-insert (about-tabs name) |
1018 (format "<%s>\n%s\n" address shortinfo)))) | 1029 (format "<%s>\n%s\n" address shortinfo)))) |
1019 | 1030 |
1020 (defun about-hackers (&rest ignore) | 1031 (defun about-hackers (&rest ignore) |
1021 (unless (about-get-buffer "*About Hackers*") | 1032 (unless (about-get-buffer "*About Contributors*") |
1022 (let ((title "Other Contributors to XEmacs")) | 1033 (let ((title "Other Contributors to XEmacs")) |
1023 (widget-insert | 1034 (widget-insert |
1024 (about-center title) | 1035 (about-center title) |
1025 (about-with-face title 'bold))) | 1036 (about-with-face title 'bold))) |
1026 (widget-insert | 1037 (widget-insert |
1181 (about-show-linked-info 'jason "\ | 1192 (about-show-linked-info 'jason "\ |
1182 Beta tester and manager of the various XEmacs mailing lists. | 1193 Beta tester and manager of the various XEmacs mailing lists. |
1183 Originator and maintainer of the gnus.org domain.\n") | 1194 Originator and maintainer of the gnus.org domain.\n") |
1184 (about-show-linked-info 'jmiller "\ | 1195 (about-show-linked-info 'jmiller "\ |
1185 Beta tester and last hacker of calendar.\n") | 1196 Beta tester and last hacker of calendar.\n") |
1197 (about-show-linked-info 'chr "\ | |
1198 Maintainer of the XEmacs FAQ and proud author of `zap-up-to-char'.\n") | |
1186 (flet ((print-short (name addr &optional shortinfo) | 1199 (flet ((print-short (name addr &optional shortinfo) |
1187 (concat (about-with-face name 'italic) | 1200 (concat (about-with-face name 'italic) |
1188 (about-tabs name) | 1201 (about-tabs name) |
1189 "<" addr ">\n" | 1202 "<" addr ">\n" |
1190 (if shortinfo (concat shortinfo "\n") "")))) | 1203 (if shortinfo (concat shortinfo "\n") "")))) |
1367 (print-short "Peter Skov Knudsen" "knu@dde.dk") | 1380 (print-short "Peter Skov Knudsen" "knu@dde.dk") |
1368 (print-short "Jens Krinke" "krinke@ips.cs.tu-bs.de") | 1381 (print-short "Jens Krinke" "krinke@ips.cs.tu-bs.de") |
1369 (print-short "Maximilien Lincourt" "max@toonboom.com") | 1382 (print-short "Maximilien Lincourt" "max@toonboom.com") |
1370 (print-short "Mats Larsson" "Mats.Larsson@uab.ericsson.se") | 1383 (print-short "Mats Larsson" "Mats.Larsson@uab.ericsson.se") |
1371 (print-short "Simon Leinen" "simon@instrumatic.ch") | 1384 (print-short "Simon Leinen" "simon@instrumatic.ch") |
1372 (print-short "Carsten Leonhardt" "leo@arioch.tng.oche.de") | 1385 (print-short "Carsten Leonhardt" "leo@arioch.oche.de") |
1373 (print-short "James LewisMoss" "moss@cs.sc.edu") | 1386 (print-short "James LewisMoss" "moss@cs.sc.edu") |
1374 (print-short "Mats Lidell" "mats.lidell@contactor.se") | 1387 (print-short "Mats Lidell" "mats.lidell@contactor.se") |
1375 (print-short "Matt Liggett" "mliggett@seven.ucs.indiana.edu") | 1388 (print-short "Matt Liggett" "mliggett@seven.ucs.indiana.edu") |
1376 (print-short "Christian Limpach" "Christian.Limpach@nice.ch") | 1389 (print-short "Christian Limpach" "Christian.Limpach@nice.ch") |
1377 (print-short "Maximilien Lincourt" "max@toonboom.com") | 1390 (print-short "Maximilien Lincourt" "max@toonboom.com") |
1405 (print-short "Casey Nielson" "knielson@joule.elee.calpoly.edu") | 1418 (print-short "Casey Nielson" "knielson@joule.elee.calpoly.edu") |
1406 (print-short "Georg Nikodym" "Georg.Nikodym@canada.sun.com") | 1419 (print-short "Georg Nikodym" "Georg.Nikodym@canada.sun.com") |
1407 (print-short "Andy Norman" "ange@hplb.hpl.hp.com") | 1420 (print-short "Andy Norman" "ange@hplb.hpl.hp.com") |
1408 (print-short "Joe Nuspl" "nuspl@sequent.com") | 1421 (print-short "Joe Nuspl" "nuspl@sequent.com") |
1409 (print-short "Kim Nyberg" "kny@tekla.fi") | 1422 (print-short "Kim Nyberg" "kny@tekla.fi") |
1410 (print-short "Christian Nybø" "chr@mediascience.no") | |
1411 (print-short "Kevin Oberman" "oberman@es.net") | 1423 (print-short "Kevin Oberman" "oberman@es.net") |
1412 (print-short "David Ofelt" "ofelt@getalife.Stanford.EDU") | 1424 (print-short "David Ofelt" "ofelt@getalife.Stanford.EDU") |
1413 (print-short "Alexandre Oliva" "oliva@dcc.unicamp.br") | 1425 (print-short "Alexandre Oliva" "oliva@dcc.unicamp.br") |
1414 (print-short "Tore Olsen" "toreo@colargol.idb.hist.no") | 1426 (print-short "Tore Olsen" "toreo@colargol.idb.hist.no") |
1415 (print-short "Greg Onufer" "Greg.Onufer@eng.sun.com") | 1427 (print-short "Greg Onufer" "Greg.Onufer@eng.sun.com") |
1444 (print-short "Darrel Schneider" "darrel@slc.com") | 1456 (print-short "Darrel Schneider" "darrel@slc.com") |
1445 (print-short "Hayden Schultz" "haydens@ll.mit.edu") | 1457 (print-short "Hayden Schultz" "haydens@ll.mit.edu") |
1446 (print-short "Cotton Seed" "cottons@cybercom.net") | 1458 (print-short "Cotton Seed" "cottons@cybercom.net") |
1447 (print-short "Axel Seibert" "seiberta@informatik.tu-muenchen.de") | 1459 (print-short "Axel Seibert" "seiberta@informatik.tu-muenchen.de") |
1448 (print-short "Odd-Magne Sekkingstad" "oddms@ii.uib.no") | 1460 (print-short "Odd-Magne Sekkingstad" "oddms@ii.uib.no") |
1461 (print-short "Gregory Neil Shapiro" "gshapiro@sendmail.org") | |
1449 (print-short "Justin Sheehy" "justin@linus.mitre.org") | 1462 (print-short "Justin Sheehy" "justin@linus.mitre.org") |
1450 (print-short "John Shen" "zfs60@cas.org") | 1463 (print-short "John Shen" "zfs60@cas.org") |
1451 (print-short "Murata Shuuichirou" "mrt@mickey.ai.kyutech.ac.jp") | 1464 (print-short "Murata Shuuichirou" "mrt@mickey.ai.kyutech.ac.jp") |
1452 (print-short "Matt Simmons" "simmonmt@acm.org") | 1465 (print-short "Matt Simmons" "simmonmt@acm.org") |
1453 (print-short "Dinesh Somasekhar" "somasekh@ecn.purdue.edu") | 1466 (print-short "Dinesh Somasekhar" "somasekh@ecn.purdue.edu") |