comparison lisp/prim/about.el @ 207:e45d5e7c476e r20-4b2

Import from CVS: tag r20-4b2
author cvs
date Mon, 13 Aug 2007 10:03:52 +0200
parents 850242ba4a81
children 41ff10fd062f
comparison
equal deleted inserted replaced
206:d3e9274cbc4e 207:e45d5e7c476e
67 (jens "Jens Lautenbacher" "jens@lemcbed.lem.uni-karlsruhe.de") 67 (jens "Jens Lautenbacher" "jens@lemcbed.lem.uni-karlsruhe.de")
68 (jwz "Jamie Zawinski" "jwz@netscape.com") 68 (jwz "Jamie Zawinski" "jwz@netscape.com")
69 (kazz "IENAGA Kazuyuki" "ienaga@jsys.co.jp") 69 (kazz "IENAGA Kazuyuki" "ienaga@jsys.co.jp")
70 (kyle "Kyle Jones" "kyle_jones@wonderworks.com") 70 (kyle "Kyle Jones" "kyle_jones@wonderworks.com")
71 (larsi "Lars Magne Ingebrigtsen" "larsi@gnus.org") 71 (larsi "Lars Magne Ingebrigtsen" "larsi@gnus.org")
72 (marcpa "Marc Paquette" "marcpa@CAM.ORG")
72 (mly "Richard Mlynarik" "mly@adoc.xerox.com") 73 (mly "Richard Mlynarik" "mly@adoc.xerox.com")
73 (morioka "MORIOKA Tomohiko" "morioka@jaist.ac.jp") 74 (morioka "MORIOKA Tomohiko" "morioka@jaist.ac.jp")
74 (mrb "Martin Buchholz" "mrb@sun.eng.com") 75 (mrb "Martin Buchholz" "mrb@sun.eng.com")
76 (ograf "Oliver Graf" "ograf@fga.de")
75 (pez "Peter Pezaris" "pez@dwwc.com") 77 (pez "Peter Pezaris" "pez@dwwc.com")
76 (piper "Andy Piper" "andy@parallax.co.uk") 78 (piper "Andy Piper" "andy@parallax.co.uk")
77 (rickc "Rick Campbell" "rickc@lehman.com") 79 (rickc "Rick Campbell" "rickc@lehman.com")
78 (rossini "Anthony Rossini" "rossini@stat.sc.edu") 80 (rossini "Anthony Rossini" "rossini@stat.sc.edu")
79 (shelton "Vin Shelton" "acs@acm.org") 81 (vin "Vin Shelton" "acs@acm.org")
80 (sperber "Michael Sperber" "sperber@informatik.uni-tuebingen.de") 82 (sperber "Michael Sperber" "sperber@informatik.uni-tuebingen.de")
81 (slb "SL Baur" "steve@xemacs.org") 83 (slb "SL Baur" "steve@xemacs.org")
82 (stig "Jonathan Stigelman" "stig@hackvan.com") 84 (stig "Jonathan Stigelman" "stig@hackvan.com")
85 (stigb "Stig Bjorlykke" "stigb@tihlde.hist.no")
83 (thiessel "Marcus Thiessel" "thiessel@rhrk.uni-kl.de") 86 (thiessel "Marcus Thiessel" "thiessel@rhrk.uni-kl.de")
84 (vladimir "Vladimir Ivanovic" "vladimir@mri.com") 87 (vladimir "Vladimir Ivanovic" "vladimir@mri.com")
85 (wing "Ben Wing" "wing@xemacs.org") 88 (wing "Ben Wing" "wing@xemacs.org")
86 (wmperry "William Perry" "wmperry@aventail.com")) 89 (wmperry "William Perry" "wmperry@aventail.com"))
87 "Alist of XEmacs hackers.") 90 "Alist of XEmacs hackers.")
98 (dmoore . "http://oj.egbt.org/dmoore/") 101 (dmoore . "http://oj.egbt.org/dmoore/")
99 (jwz . "http://people.netscape.com/jwz/") 102 (jwz . "http://people.netscape.com/jwz/")
100 (kazz . "http://www.imasy.or.jp/~kazz/") 103 (kazz . "http://www.imasy.or.jp/~kazz/")
101 (kyle . "http://www.wonderworks.com/kyle/") 104 (kyle . "http://www.wonderworks.com/kyle/")
102 (larsi . "http://www.ifi.uio.no/~larsi/") 105 (larsi . "http://www.ifi.uio.no/~larsi/")
106 (marcpa . "http://www.positron911.com/products/power.htm")
107 (ograf . "http://www.fga.de/~ograf/")
103 (pez . "http://www.dwwc.com/") 108 (pez . "http://www.dwwc.com/")
104 (shelton . "http://www.upa.org/") 109 (vin . "http://www.upa.org/")
110 (stigb . "http://www.tihlde.hist.no/~stigb/")
105 (wget . "ftp://gnjilux.cc.fer.hr/pub/unix/util/wget/") 111 (wget . "ftp://gnjilux.cc.fer.hr/pub/unix/util/wget/")
106 (xemacs . "http://www.xemacs.org/")) 112 (xemacs . "http://www.xemacs.org/"))
107 "Some of the more important URLs.") 113 "Some of the more important URLs.")
108 114
109 (defvar about-left-margin 3) 115 (defvar about-left-margin 3)
155 :action (lambda (&rest ignore) 161 :action (lambda (&rest ignore)
156 (bury-buffer)) 162 (bury-buffer))
157 "Remove") 163 "Remove")
158 (widget-create 'link :help-echo "Kill buffer" 164 (widget-create 'link :help-echo "Kill buffer"
159 :action (lambda (&rest ignore) 165 :action (lambda (&rest ignore)
160 (bury-buffer)) 166 (kill-buffer (current-buffer)))
161 "Kill")) 167 "Kill"))
162 (widget-insert " this buffer.\n") 168 (widget-insert " this buffer.\n")
163 (use-local-map (make-sparse-keymap)) 169 (use-local-map (make-sparse-keymap))
164 (set-keymap-parent (current-local-map) widget-keymap) 170 (set-keymap-parent (current-local-map) widget-keymap)
165 (if (eq type 'bury) 171 (if (eq type 'bury)
510 (concat (symbol-name who) 516 (concat (symbol-name who)
511 (if (memq (device-class) 517 (if (memq (device-class)
512 '(color grayscale)) 518 '(color grayscale))
513 "" "m") 519 "" "m")
514 ".xpm") 520 ".xpm")
515 data-directory)) 521 (locate-data-directory "photos")))
516 (data nil)) 522 (data nil))
517 (unless (file-exists-p file) 523 (unless (file-exists-p file)
518 ;; Maybe the file is compressed? 524 ;; Maybe the file is compressed?
519 (setq file (concat file ".Z")) 525 (setq file (concat file ".Z"))
520 (if (file-exists-p file) 526 (if (file-exists-p file)
666 wants a MIG welder and air tools. 672 wants a MIG welder and air tools.
667 673
668 Stig likes to perch, hang from the ceiling, and climb on the walls. 674 Stig likes to perch, hang from the ceiling, and climb on the walls.
669 Stig has a cool van. Stig would like to be able to telecommute from, 675 Stig has a cool van. Stig would like to be able to telecommute from,
670 say, the north rim of the Grand Canyon or the midst of Baja.\n")) 676 say, the north rim of the Grand Canyon or the midst of Baja.\n"))
677 (stigb
678 (widget-insert "\
679 Currently studying computer science in Trondheim, Norway. Full time
680 Linux user and proud of it. XEmacs hacker light. Maintainer of the
681 RPM package.
682
683 See:\t")
684 (about-url-link 'stigb "Visit Stig's home page"))
671 (baw 685 (baw
672 (widget-insert 686 (widget-insert
673 "\ 687 "\
674 Author of CC Mode, for C, C++, Objective-C and Java editing, and 688 Author of CC Mode, for C, C++, Objective-C and Java editing, and
675 Supercite for mail and news citing. Also various and sundry other 689 Supercite for mail and news citing. Also various and sundry other
736 project connected with CASCADE and CERN and stuff. 750 project connected with CASCADE and CERN and stuff.
737 751
738 See ") 752 See ")
739 (about-url-link 'larsi "Visit the Larsissistic pages") 753 (about-url-link 'larsi "Visit the Larsissistic pages")
740 (widget-insert ".\n")) 754 (widget-insert ".\n"))
755 (marcpa
756 (widget-insert "\
757 I work for Positron Industries Inc., Public Safety Division.
758 I'm part of the team producing POWER 911, a 911 emergency response
759 system written in Modula3:\n")
760 (about-url-link 'marcpa "Visit POWER 911")
761 (widget-insert "\
762 Previously, I worked at Softimage Inc., now a Microsoft company
763 (eeekkk!), as a UNIX system administrator. This is where I've been
764 converted to NT.
765
766 In a previous life, I was a programmer/sysadmin at CRIM (Centre de
767 Recherche Informatique de Montreal) for the speech recognition group.\n"))
741 (jens 768 (jens
742 (widget-insert "\ 769 (widget-insert "\
743 Jens did the artwork for graphics added to XEmacs 20.2 and 19.15. 770 Jens did the artwork for graphics added to XEmacs 20.2 and 19.15.
744 771
745 I'm currently working at the University of Karlsruhe, Germany on 772 I'm currently working at the University of Karlsruhe, Germany on
797 also responsible for the ports of facemenu.el and enriched.el. When 824 also responsible for the ports of facemenu.el and enriched.el. When
798 Mike isn't busy putting together patches for free software he has just 825 Mike isn't busy putting together patches for free software he has just
799 installed or changing his hairstyle, he does research in modern 826 installed or changing his hairstyle, he does research in modern
800 programming languages and their implementation, and hopes that one day 827 programming languages and their implementation, and hopes that one day
801 XEmacs will speak Scheme.\n")) 828 XEmacs will speak Scheme.\n"))
802 (shelton 829 (vin
803 (widget-insert "\ 830 (widget-insert "\
804 Vin maintains the XEmacs patch pages in order to bring a more 831 Vin maintains the XEmacs patch pages in order to bring a more
805 stable XEmacs. (Actually, he does it 'cause it's fun and he's been 832 stable XEmacs. (Actually, he does it 'cause it's fun and he's been
806 using emacs for a long, long time.) Vin also contributed the detached 833 using emacs for a long, long time.) Vin also contributed the detached
807 minibuffer code as well as a few minor enhancements to the menubar 834 minibuffer code as well as a few minor enhancements to the menubar
811 tell anyone, but it's named after an Ultimate team I used to play 838 tell anyone, but it's named after an Ultimate team I used to play
812 with in Austin, Texas - the Ether Bunnies. I'm getting too old 839 with in Austin, Texas - the Ether Bunnies. I'm getting too old
813 to play competitive Ultimate any more, so now I've gotten roped 840 to play competitive Ultimate any more, so now I've gotten roped
814 into serving on the board of directors of the Ultimate Players 841 into serving on the board of directors of the Ultimate Players
815 Association. See ") 842 Association. See ")
816 (about-url-link 'shelton "Visit the UPA homepage") 843 (about-url-link 'vin "Visit the UPA homepage")
817 (widget-insert ".\n")) 844 (widget-insert ".\n"))
818 (ajc 845 (ajc
819 (widget-insert "\ 846 (widget-insert "\
820 When not helping maintain the XEmacs website, Andrew is a Network 847 When not helping maintain the XEmacs website, Andrew is a Network
821 Software Engineer(tm) for Monash University in Australia, maintaining 848 Software Engineer(tm) for Monash University in Australia, maintaining
888 statistical programming and data analysis for SAS, S, S-PLUS, R, 915 statistical programming and data analysis for SAS, S, S-PLUS, R,
889 XLispStat; configurable for nearly any other statistical 916 XLispStat; configurable for nearly any other statistical
890 language/package one might want. In spare time, acts as a 917 language/package one might want. In spare time, acts as a
891 Ph.D. (bio)statistician for money and amusement. Current position: 918 Ph.D. (bio)statistician for money and amusement. Current position:
892 Assistant Professor of Statistics at the University of South Carolina.\n")) 919 Assistant Professor of Statistics at the University of South Carolina.\n"))
920 (ograf
921 (widget-insert "\
922 I'm a student of computer sciences at the University of Koblenz. My
923 major is computational linguistics (human language generation and
924 analysis).
925
926 I make my living as a managing director of a small but fine company
927 which I started two years ago with one of my friends. We provide
928 business network solutions based on linux servers and various other
929 networking products.
930
931 Most of my spare time I spent on the development of the XEmacs DnD
932 events, a enhanced version of Tk called TkStep (better looks, DnD,
933 and more), and various other minor hacks: ISDN-tools, cd players,
934 python, etc...
935
936 To see some of these have a look at ")
937 (about-url-link 'ograf "one of my homepages")
938 (widget-insert ".\n"))
893 939
894 )) 940 ))
895 941
896 ;; Setup the buffer for a maintainer. 942 ;; Setup the buffer for a maintainer.
897 (defun about-maintainer (widget &optional event) 943 (defun about-maintainer (widget &optional event)
1058 and the operator, in order to detect the intentions of the latter. 1104 and the operator, in order to detect the intentions of the latter.
1059 1105
1060 Otherwise, I'm, say, 35.82% professional Jazz guitar player, 1106 Otherwise, I'm, say, 35.82% professional Jazz guitar player,
1061 which means that's not the way I earn my crust, but things may very 1107 which means that's not the way I earn my crust, but things may very
1062 well reverse in the future ...\n") 1108 well reverse in the future ...\n")
1109 (about-show-linked-info 'marcpa "\
1110 I work for Positron Industries Inc., Public Safety Division.\n")
1063 (about-show-linked-info 'pez "\ 1111 (about-show-linked-info 'pez "\
1064 Author of SQL Mode, edit-toolbar, mailtool-mode, and various other 1112 Author of SQL Mode, edit-toolbar, mailtool-mode, and various other
1065 small packages with varying degrees of usefulness.\n") 1113 small packages with varying degrees of usefulness.\n")
1066 (about-show-linked-info 'rickc "\ 1114 (about-show-linked-info 'rickc "\
1067 The hacker formerly known as Rick Busdiecker, author of ILISP.\n") 1115 The hacker formerly known as Rick Busdiecker, maintainer of ILISP.\n")
1068 (about-show-linked-info 'rossini "\ 1116 (about-show-linked-info 'rossini "\
1069 Author of the first XEmacs FAQ, as well as minor priest in the 1117 Author of the first XEmacs FAQ, as well as minor priest in the
1070 movement to get every statistician in the world to use XEmacs for 1118 movement to get every statistician in the world to use XEmacs for
1071 statistical programming and data analysis. Current development lead 1119 statistical programming and data analysis. Current development lead
1072 for ESS (Emacs Speaks Statistics), a mode and inferior mode for 1120 for ESS (Emacs Speaks Statistics), a mode and inferior mode for
1073 statistical programming and data analysis for SAS, S, S-PLUS, R, 1121 statistical programming and data analysis for SAS, S, S-PLUS, R,
1074 XLispStat; configurable for nearly any other statistical 1122 XLispStat; configurable for nearly any other statistical
1075 language/package one might want. In spare time, acts as a 1123 language/package one might want. In spare time, acts as a
1076 Ph.D. (bio)statistician for money and amusement. Current position: 1124 Ph.D. (bio)statistician for money and amusement. Current position:
1077 Assistant Professor of Statistics at the University of South Carolina.") 1125 Assistant Professor of Statistics at the University of South Carolina.\n")
1126 (about-show-linked-info 'stigb "\
1127 Currently studying computer science in Trondheim, Norway. Full time
1128 Linux user and proud of it. XEmacs hacker light. Maintainer of the
1129 RPM package.\n")
1130 (about-show-linked-info 'ograf "\
1131 Is currently working on the integration of OffiX and CDE drag-and-drop
1132 into the event system of XEmacs.\n")
1078 (flet ((print-short (name addr &optional shortinfo) 1133 (flet ((print-short (name addr &optional shortinfo)
1079 (concat (about-with-face name 'italic) 1134 (concat (about-with-face name 'italic)
1080 (about-tabs name) 1135 (about-tabs name)
1081 "<" addr ">\n" 1136 "<" addr ">\n"
1082 (if shortinfo (concat shortinfo "\n") "")))) 1137 (if shortinfo (concat shortinfo "\n") ""))))
1271 (print-short "Tore Olsen" "toreo@colargol.idb.hist.no") 1326 (print-short "Tore Olsen" "toreo@colargol.idb.hist.no")
1272 (print-short "Greg Onufer" "Greg.Onufer@eng.sun.com") 1327 (print-short "Greg Onufer" "Greg.Onufer@eng.sun.com")
1273 (print-short "Achim Oppelt" "aoppelt@theorie3.physik.uni-erlangen.de") 1328 (print-short "Achim Oppelt" "aoppelt@theorie3.physik.uni-erlangen.de")
1274 (print-short "Rebecca Ore" "rebecca.ore@op.net") 1329 (print-short "Rebecca Ore" "rebecca.ore@op.net")
1275 (print-short "Sudeep Kumar Palat" "palat@idt.unit.no") 1330 (print-short "Sudeep Kumar Palat" "palat@idt.unit.no")
1276 (print-short "Marc Paquette" "Marc.Paquette@Softimage.com")
1277 (print-short "Jens-U H Petersen" "petersen@kurims.kyoto-u.ac.jp") 1331 (print-short "Jens-U H Petersen" "petersen@kurims.kyoto-u.ac.jp")
1278 (print-short "Joel Peterson" "tarzan@aosi.com") 1332 (print-short "Joel Peterson" "tarzan@aosi.com")
1279 (print-short "Thomas A. Peterson" "tap@src.honeywell.com") 1333 (print-short "Thomas A. Peterson" "tap@src.honeywell.com")
1280 (print-short "Tibor Polgar" "tlp00@eng.amdahl.com") 1334 (print-short "Tibor Polgar" "tlp00@eng.amdahl.com")
1281 (print-short "Frederic Poncin" "fp@info.ucl.ac.be") 1335 (print-short "Frederic Poncin" "fp@info.ucl.ac.be")
1297 (print-short "Darrel Schneider" "darrel@slc.com") 1351 (print-short "Darrel Schneider" "darrel@slc.com")
1298 (print-short "Hayden Schultz" "haydens@ll.mit.edu") 1352 (print-short "Hayden Schultz" "haydens@ll.mit.edu")
1299 (print-short "Cotton Seed" "cottons@cybercom.net") 1353 (print-short "Cotton Seed" "cottons@cybercom.net")
1300 (print-short "Axel Seibert" "seiberta@informatik.tu-muenchen.de") 1354 (print-short "Axel Seibert" "seiberta@informatik.tu-muenchen.de")
1301 (print-short "Odd-Magne Sekkingstad" "oddms@ii.uib.no") 1355 (print-short "Odd-Magne Sekkingstad" "oddms@ii.uib.no")
1302 (print-short "Vinnie Shelton" "shelton@icd.teradyne.com")
1303 (print-short "John Shen" "zfs60@cas.org") 1356 (print-short "John Shen" "zfs60@cas.org")
1304 (print-short "Murata Shuuichirou" "mrt@mickey.ai.kyutech.ac.jp") 1357 (print-short "Murata Shuuichirou" "mrt@mickey.ai.kyutech.ac.jp")
1358 (print-short "Matt Simmons" "simmonmt@acm.org")
1305 (print-short "Dinesh Somasekhar" "somasekh@ecn.purdue.edu") 1359 (print-short "Dinesh Somasekhar" "somasekh@ecn.purdue.edu")
1306 (print-short "Jeffrey Sparkes" "jsparkes@bnr.ca") 1360 (print-short "Jeffrey Sparkes" "jsparkes@bnr.ca")
1307 (print-short "Manoj Srivastava" "srivasta@pilgrim.umass.edu") 1361 (print-short "Manoj Srivastava" "srivasta@pilgrim.umass.edu")
1308 (print-short "Francois Staes" "frans@kiwi.uia.ac.be") 1362 (print-short "Francois Staes" "frans@kiwi.uia.ac.be")
1309 (print-short "Anders Stenman" "stenman@isy.liu.se") 1363 (print-short "Anders Stenman" "stenman@isy.liu.se")
1312 (print-short "Samuel Tardieu" "sam@inf.enst.fr") 1366 (print-short "Samuel Tardieu" "sam@inf.enst.fr")
1313 (print-short "James Thompson" "thompson@wg2.waii.com") 1367 (print-short "James Thompson" "thompson@wg2.waii.com")
1314 (print-short "Raymond L. Toy" "toy@rtp.ericsson.se") 1368 (print-short "Raymond L. Toy" "toy@rtp.ericsson.se")
1315 (print-short "Remek Trzaska" "remek@npac.syr.edu") 1369 (print-short "Remek Trzaska" "remek@npac.syr.edu")
1316 (print-short "TSUTOMU Nakamura" "tsutomu@rs.kyoto.omronsoft.co.jp") 1370 (print-short "TSUTOMU Nakamura" "tsutomu@rs.kyoto.omronsoft.co.jp")
1371 (print-short "Stephen Turnbull" "turnbull@sk.tsukuba.ac.jp")
1317 (print-short "John Turner" "turner@xdiv.lanl.gov") 1372 (print-short "John Turner" "turner@xdiv.lanl.gov")
1318 (print-short "UENO Fumihiro" "7m2vej@ritp.ye.IHI.CO.JP") 1373 (print-short "UENO Fumihiro" "7m2vej@ritp.ye.IHI.CO.JP")
1319 (print-short "Juan E. Villacis" "jvillaci@cs.indiana.edu") 1374 (print-short "Juan E. Villacis" "jvillaci@cs.indiana.edu")
1320 (print-short "Jan Vroonhof" "vroonhof@math.ethz.ch") 1375 (print-short "Jan Vroonhof" "vroonhof@math.ethz.ch")
1321 (print-short "Vladimir Vukicevic" "vladimir@intrepid.com") 1376 (print-short "Vladimir Vukicevic" "vladimir@intrepid.com")