Mercurial > hg > xemacs-beta
comparison lisp/prim/about.el @ 175:2d532a89d707 r20-3b14
Import from CVS: tag r20-3b14
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:50:14 +0200 |
parents | 85ec50267440 |
children | 6075d714658b |
comparison
equal
deleted
inserted
replaced
174:bb3568571b84 | 175:2d532a89d707 |
---|---|
62 (dmoore "David Moore" "dmoore@ucsd.edu") | 62 (dmoore "David Moore" "dmoore@ucsd.edu") |
63 (hniksic "Hrvoje Niksic" "hniksic@srce.hr") | 63 (hniksic "Hrvoje Niksic" "hniksic@srce.hr") |
64 (jareth "Jareth Hein" "jhod@po.iijnet.or.jp") | 64 (jareth "Jareth Hein" "jhod@po.iijnet.or.jp") |
65 (jens "Jens Lautenbacher" "jens@lemcbed.lem.uni-karlsruhe.de") | 65 (jens "Jens Lautenbacher" "jens@lemcbed.lem.uni-karlsruhe.de") |
66 (jwz "Jamie Zawinski" "jwz@netscape.com") | 66 (jwz "Jamie Zawinski" "jwz@netscape.com") |
67 (kazz "IENAGA Kazuyuki" "ienaga@jsys.co.jp") | |
67 (kyle "Kyle Jones" "kyle_jones@wonderworks.com") | 68 (kyle "Kyle Jones" "kyle_jones@wonderworks.com") |
68 (larsi "Lars Magne Ingebrigtsen" "larsi@gnus.org") | 69 (larsi "Lars Magne Ingebrigtsen" "larsi@gnus.org") |
69 (mly "Richard Mlynarik" "mly@adoc.xerox.com") | 70 (mly "Richard Mlynarik" "mly@adoc.xerox.com") |
70 (morioka "MORIOKA Tomohiko" "morioka@jaist.ac.jp") | 71 (morioka "MORIOKA Tomohiko" "morioka@jaist.ac.jp") |
71 (mrb "Martin Buchholz" "mrb@sun.eng.com") | 72 (mrb "Martin Buchholz" "mrb@sun.eng.com") |
72 (piper "Andy Piper" "andy@parallax.co.uk") | 73 (piper "Andy Piper" "andy@parallax.co.uk") |
73 (shelton "Vin Shelton" "acs@acm.org") | 74 (shelton "Vin Shelton" "acs@acm.org") |
74 (sperber "Michael Sperber" "sperber@informatik.uni-tuebingen.de") | 75 (sperber "Michael Sperber" "sperber@informatik.uni-tuebingen.de") |
75 (steve "Steve Baur" "steve@xemacs.org") | 76 (slb "SL Baur" "steve@xemacs.org") |
76 (stig "Jonathan Stigelman" "stig@hackvan.com") | 77 (stig "Jonathan Stigelman" "stig@hackvan.com") |
77 (thiessel "Marcus Thiessel" "thiessel@rhrk.uni-kl.de") | 78 (thiessel "Marcus Thiessel" "thiessel@rhrk.uni-kl.de") |
78 (vladimir "Vladimir Ivanovic" "vladimir@mri.com") | 79 (vladimir "Vladimir Ivanovic" "vladimir@mri.com") |
79 (wing "Ben Wing" "wing@xemacs.org") | 80 (wing "Ben Wing" "wing@xemacs.org") |
80 (wmperry "William Perry" "wmperry@aventail.com")) | 81 (wmperry "William Perry" "wmperry@aventail.com")) |
88 (altrasoft . "http://www.altrasoft.com/") | 89 (altrasoft . "http://www.altrasoft.com/") |
89 (baw . "http://www.python.org/~bwarsaw/") | 90 (baw . "http://www.python.org/~bwarsaw/") |
90 (cc-mode . "http://www.python.org/ftp/emacs/") | 91 (cc-mode . "http://www.python.org/ftp/emacs/") |
91 (dmoore . "http://oj.egbt.org/dmoore/") | 92 (dmoore . "http://oj.egbt.org/dmoore/") |
92 (jwz . "http://www.netscape.com/people/jwz/") | 93 (jwz . "http://www.netscape.com/people/jwz/") |
94 (kazz . "http://www.imasy.or.jp/~kazz/") | |
93 (kyle . "http://www.wonderworks.com/kyle/") | 95 (kyle . "http://www.wonderworks.com/kyle/") |
94 (larsi . "http://www.ifi.uio.no/~larsi/") | 96 (larsi . "http://www.ifi.uio.no/~larsi/") |
95 (shelton . "http://www.upa.org/") | 97 (shelton . "http://www.upa.org/") |
96 (steve . "http://www.miranova.com/~steve/") | |
97 (wget . "ftp://gnjilux.cc.fer.hr/pub/unix/util/wget/") | 98 (wget . "ftp://gnjilux.cc.fer.hr/pub/unix/util/wget/") |
98 (xemacs . "http://www.xemacs.org/")) | 99 (xemacs . "http://www.xemacs.org/")) |
99 "Some of the more important URLs.") | 100 "Some of the more important URLs.") |
100 | 101 |
101 (defvar about-left-margin 3) | 102 (defvar about-left-margin 3) |
245 :action 'about-maintainer | 246 :action 'about-maintainer |
246 :tag name | 247 :tag name |
247 :value who) | 248 :value who) |
248 (widget-insert (format " <%s>\n" address))))) | 249 (widget-insert (format " <%s>\n" address))))) |
249 ;; Setup persons responsible for this release. | 250 ;; Setup persons responsible for this release. |
250 (mapc 'setup-person '(steve mrb hniksic)) | 251 (mapc 'setup-person '(slb mrb hniksic)) |
251 (widget-insert "\n\t* ") | 252 (widget-insert "\n\t* ") |
252 (let ((widget-link-prefix "") (widget-link-suffix "")) | 253 (let ((widget-link-prefix "") (widget-link-suffix "")) |
253 (widget-create 'link :help-echo "A legion of XEmacs hackers" | 254 (widget-create 'link :help-echo "A legion of XEmacs hackers" |
254 :action 'about-hackers | 255 :action 'about-hackers |
255 "And many other contributors...")) | 256 "And many other contributors...")) |
540 | 541 |
541 ;; Insert info about a maintainer. Add the maintainer-specific info | 542 ;; Insert info about a maintainer. Add the maintainer-specific info |
542 ;; here. | 543 ;; here. |
543 (defun about-maintainer-info (entry) | 544 (defun about-maintainer-info (entry) |
544 (ecase (car entry) | 545 (ecase (car entry) |
545 (steve | 546 (slb |
546 (widget-insert "\ | 547 (widget-insert "\ |
547 Steve took over the maintenance of XEmacs in November of 1996 (it | 548 I took over the maintenance of XEmacs in November of 1996 (it |
548 seemed like a good idea at the time ...). In real life he is a | 549 seemed like a good idea at the time ...). In real life I am a |
549 network administrator and Unix systems programmer for Miranova | 550 network administrator and Unix systems programmer for Calag.com, |
550 Systems, Inc. | 551 Inc. a small, but growing ISP in California. |
551 | 552 |
552 Steve's main contributions to XEmacs have been reviving the FAQ, | 553 My main contributions to XEmacs have been reviving the FAQ, |
553 testing and integrating patches, tracking down and fixing bugs, and | 554 testing and integrating patches, tracking down and fixing bugs, and |
554 answering hundreds of questions on Usenet. | 555 answering hundreds of questions on Usenet. |
555 | 556 |
556 Steve has a home page at ") | 557 Is that my picture? I believe I already answered that in |
557 (about-url-link 'steve "Visit Steve's home page") | 558 xemacs-beta-discuss ...") |
558 (widget-insert ".\n")) | 559 (widget-insert ".\n")) |
559 (mrb | 560 (mrb |
560 (widget-insert "\ | 561 (widget-insert "\ |
561 Martin is the XEmacs guy at DevPro, a part of Sun Microsystems. | 562 Martin is the XEmacs guy at DevPro, a part of Sun Microsystems. |
562 Martin used to do XEmacs as a `hobby' while at IBM, and was crazy | 563 Martin used to do XEmacs as a `hobby' while at IBM, and was crazy |
725 See ") | 726 See ") |
726 (about-url-link 'larsi "Visit the Larsissistic pages") | 727 (about-url-link 'larsi "Visit the Larsissistic pages") |
727 (widget-insert ".\n")) | 728 (widget-insert ".\n")) |
728 (jens | 729 (jens |
729 (widget-insert "\ | 730 (widget-insert "\ |
730 Jens did the artwork for graphics added to XEmacs 20.1 and 19.15. | 731 Jens did the artwork for graphics added to XEmacs 20.2 and 19.15. |
731 | 732 |
732 I'm currently working at the University of Karlsruhe, Germany on | 733 I'm currently working at the University of Karlsruhe, Germany on |
733 getting my diploma thesis on Supersymmetry (uuh, that's physics) done. | 734 getting my diploma thesis on Supersymmetry (uuh, that's physics) done. |
734 After that (and all the remaining exams) I'm looking forward to make a | 735 After that (and all the remaining exams) I'm looking forward to make a |
735 living out of my hobbies -- computers (and graphics). But because I | 736 living out of my hobbies -- computers (and graphics). But because I |
811 et. al., he spends his time pursuing, among other things, a Life. | 812 et. al., he spends his time pursuing, among other things, a Life. |
812 Some of this currently involves doing an A-Z (by country) of | 813 Some of this currently involves doing an A-Z (by country) of |
813 restaurants with friends, and has, in the past, involved dyeing his | 814 restaurants with friends, and has, in the past, involved dyeing his |
814 hair various colours (see ") | 815 hair various colours (see ") |
815 (about-url-link 'ajc "Visit Andrew's home page") | 816 (about-url-link 'ajc "Visit Andrew's home page") |
816 (widget-insert ".\n")))) | 817 (widget-insert ".\n")) |
818 (kazz | |
819 (widget-insert "\ | |
820 Kazz is the XEmacs lead on BSD (especially FreeBSD). | |
821 His main workspace is, probably, the latest stable version of | |
822 FreeBSD and it makes him comfortable and not. | |
823 His *mission* is to make XEmacs runs on FreeBSD without | |
824 any problem. | |
825 | |
826 In real life, he is working on a PDM product based on CORBA, | |
827 and doing consultation, design and implemention. | |
828 He loves to play soccer, yes football! | |
829 See also:") | |
830 (about-url-link 'kazz "Visit Kazz's home page") | |
831 (widget-insert ".\n")) | |
832 )) | |
817 | 833 |
818 ;; Setup the buffer for a maintainer. | 834 ;; Setup the buffer for a maintainer. |
819 (defun about-maintainer (widget &optional event) | 835 (defun about-maintainer (widget &optional event) |
820 (let* ((entry (assq (widget-value widget) xemacs-hackers)) | 836 (let* ((entry (assq (widget-value widget) xemacs-hackers)) |
821 (who (car entry)) | 837 (who (car entry)) |
959 time being an Eager Young Space Cadet and fiddling with XEmacs/Gnus | 975 time being an Eager Young Space Cadet and fiddling with XEmacs/Gnus |
960 et. al., he spends his time pursuing, among other things, a Life. | 976 et. al., he spends his time pursuing, among other things, a Life. |
961 Some of this currently involves doing an A-Z (by country) of | 977 Some of this currently involves doing an A-Z (by country) of |
962 restaurants with friends, and has, in the past, involved dyeing his | 978 restaurants with friends, and has, in the past, involved dyeing his |
963 hair various colours.\n") | 979 hair various colours.\n") |
980 (about-show-linked-info 'kazz "\ | |
981 IENAGA Kazuyuki is the XEmacs technical lead on BSD, particularly | |
982 FreeBSD.\n") | |
964 (flet ((print-short (name addr &optional shortinfo) | 983 (flet ((print-short (name addr &optional shortinfo) |
965 (concat (about-with-face name 'italic) | 984 (concat (about-with-face name 'italic) |
966 (about-tabs name) | 985 (about-tabs name) |
967 "<" addr ">\n" | 986 "<" addr ">\n" |
968 (if shortinfo (concat shortinfo "\n") "")))) | 987 (if shortinfo (concat shortinfo "\n") "")))) |
1093 (print-short "Stephan Herrmann" "sh@first.gmd.de") | 1112 (print-short "Stephan Herrmann" "sh@first.gmd.de") |
1094 (print-short "Charles Hines" "chuck_hines@VNET.IBM.COM") | 1113 (print-short "Charles Hines" "chuck_hines@VNET.IBM.COM") |
1095 (print-short "Shane Holder" "holder@rsn.hp.com") | 1114 (print-short "Shane Holder" "holder@rsn.hp.com") |
1096 (print-short "David Hughes" "djh@harston.cv.com") | 1115 (print-short "David Hughes" "djh@harston.cv.com") |
1097 (print-short "Tatsuya Ichikawa" "ichikawa@hv.epson.co.jp") | 1116 (print-short "Tatsuya Ichikawa" "ichikawa@hv.epson.co.jp") |
1098 (print-short "Kazuyuki IENAGA" "ienaga@jsys.co.jp") | |
1099 (print-short "Andrew Innes" "andrewi@harlequin.co.uk") | 1117 (print-short "Andrew Innes" "andrewi@harlequin.co.uk") |
1100 (print-short "Andreas Jaeger" "aj@arthur.pfalz.de") | 1118 (print-short "Andreas Jaeger" "aj@arthur.rhein-neckar.de") |
1101 (print-short "Markku Jarvinen" "Markku.Jarvinen@simpukka.funet.fi") | 1119 (print-short "Markku Jarvinen" "Markku.Jarvinen@simpukka.funet.fi") |
1102 (print-short "Robin Jeffries" "robin.jeffries@sun.com") | 1120 (print-short "Robin Jeffries" "robin.jeffries@sun.com") |
1103 (print-short "Philip Johnson" "johnson@uhics.ics.Hawaii.Edu") | 1121 (print-short "Philip Johnson" "johnson@uhics.ics.Hawaii.Edu") |
1104 (print-short "J. Kean Johnston" "jkj@paradigm-sa.com") | 1122 (print-short "J. Kean Johnston" "jkj@paradigm-sa.com") |
1105 (print-short "Andreas Kaempf" "andreas@sccon.com") | 1123 (print-short "Andreas Kaempf" "andreas@sccon.com") |