Mercurial > hg > xemacs-beta

comparison lisp/about.el @ 1731:a078f0c5d598

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2003-10-02 00:26:06 by youngs] * about.el (xemacs-hackers): Remove me. (about-current-release-maintainers): Ditto. (about-url-alist): Ditto. (about-personal-info): Ditto. (about-hacker-contribution): Ditto. * youngs.png, youngsm.png: Removed.
author youngs
date Thu, 02 Oct 2003 00:26:13 +0000
parents 371cff0ccdd7
children fb556d2c7344
comparison
equal deleted inserted replaced
1730:3297525407a7 1731:a078f0c5d598
161 (turnbull "Stephen Turnbull" "turnbull@xemacs.org") 161 (turnbull "Stephen Turnbull" "turnbull@xemacs.org")
162 (vin "Vin Shelton" "acs@xemacs.org") 162 (vin "Vin Shelton" "acs@xemacs.org")
163 (vladimir "Vladimir Ivanovic" "vladimir@xemacs.org") 163 (vladimir "Vladimir Ivanovic" "vladimir@xemacs.org")
164 (wmperry "William Perry" "wmperry@xemacs.org") 164 (wmperry "William Perry" "wmperry@xemacs.org")
165 (yoshiki "Yoshiki Hayashi" "yoshiki@xemacs.org") 165 (yoshiki "Yoshiki Hayashi" "yoshiki@xemacs.org")
166 (youngs "Steve Youngs" "youngs@xemacs.org")
167 ) 166 )
168 "Alist of XEmacs hackers.") 167 "Alist of XEmacs hackers.")
169 168
170 (defvar about-current-release-maintainers 169 (defvar about-current-release-maintainers
171 ;; this list should not necessarily be in sorted order. 170 ;; this list should not necessarily be in sorted order.
172 '(youngs adrian ben hniksic james piper scop sperber turnbull)) 171 '(adrian ben hniksic james piper scop sperber turnbull))
173 172
174 (defvar about-other-current-hackers 173 (defvar about-other-current-hackers
175 ;; to sort this list or the one below, use: 174 ;; to sort this list or the one below, use:
176 ;; M-x sort-regexp-fields RET [a-z]+ RET \(.*\) RET 175 ;; M-x sort-regexp-fields RET [a-z]+ RET \(.*\) RET
177 '(aj alastair cgw craig daiki dan dv fabrice golubev gunnar hisashi 176 '(aj alastair cgw craig daiki dan dv fabrice golubev gunnar hisashi
217 (rossini . "http://faculty.washington.edu/rossini/") 216 (rossini . "http://faculty.washington.edu/rossini/")
218 (stigb . "http://www.tihlde.hist.no/~stigb/") 217 (stigb . "http://www.tihlde.hist.no/~stigb/")
219 (vin . "http://www.upa.org/") 218 (vin . "http://www.upa.org/")
220 (vladimir . "http://www.leonora.org/~vladimir/") 219 (vladimir . "http://www.leonora.org/~vladimir/")
221 (wget . "http://sunsite.dk/wget/") 220 (wget . "http://sunsite.dk/wget/")
222 (xemacs . "http://www.xemacs.org/") 221 (xemacs . "http://www.xemacs.org/"))
223 (youngs . "http://eicq.sourceforge.net/"))
224 "Some of the more important URLs.") 222 "Some of the more important URLs.")
225 223
226 (defvar about-left-margin 3) 224 (defvar about-left-margin 3)
227 225
228 (defun about-lookup-url (name) 226 (defun about-lookup-url (name)
1391 \(who I now prefer not to name), wishing I was in Ireland instead.\n")) 1389 \(who I now prefer not to name), wishing I was in Ireland instead.\n"))
1392 (yoshiki 1390 (yoshiki
1393 (widget-insert 1391 (widget-insert
1394 "\ 1392 "\
1395 Sorry, no personal information available about me yet.\n")) 1393 Sorry, no personal information available about me yet.\n"))
1396 (youngs
1397 (widget-insert "\
1398 I live in Brisbane, Australia with my wife, Michelle and our two
1399 children, Kaitlyn and Blake.
1400
1401 In the past, I've been a bank officer, car salesman, insurance agent,
1402 managed a computer firm and owned and operated my own business. I now
1403 divide my time between my family, planning my next business idea (a
1404 computer consulting firm that uses zero Microsoft products), hacking
1405 XEmacs, and hacking my own XEmacs package, Eicq.
1406
1407 \tSee: ")
1408 (about-url-link 'youngs "Eicq Homepage" "Visit the Eicq homepage\n<http://eicq.sf.net/>")
1409 (widget-insert ".\n"))
1410 )) 1394 ))
1411 1395
1412 ;; Insert info about a maintainer's contribution to XEmacs. See also 1396 ;; Insert info about a maintainer's contribution to XEmacs. See also
1413 ;; `about-personal-info'. 1397 ;; `about-personal-info'.
1414 (defun about-hacker-contribution (entry) 1398 (defun about-hacker-contribution (entry)
1804 strikethru face attribute support).\n")) 1788 strikethru face attribute support).\n"))
1805 (yoshiki 1789 (yoshiki
1806 (widget-insert 1790 (widget-insert
1807 "\ 1791 "\
1808 Sorry, no information about my XEmacs contributions yet.\n")) 1792 Sorry, no information about my XEmacs contributions yet.\n"))
1809 (youngs
1810 (widget-insert "\
1811 Steve is the current XEmacs Beta Release Manager (the guy responsible
1812 for getting this version of XEmacs out the door).
1813
1814 Steve used to be our Packages Release Manager and as such is one of
1815 our resident PUI experts. He fixed the \"has never worked before\"
1816 PGP code in package-get, added the balloon-help to PUI, and a few
1817 other package related enhancements/fixes.\n"))
1818 )) 1793 ))
1819 1794
1820 ;; Setup the buffer for a maintainer. 1795 ;; Setup the buffer for a maintainer.
1821 (defun about-maintainer (widget &optional event) 1796 (defun about-maintainer (widget &optional event)
1822 (let* ((entry (assq (widget-value widget) xemacs-hackers)) 1797 (let* ((entry (assq (widget-value widget) xemacs-hackers))