Mercurial > hg > xemacs-beta
comparison lisp/about.el @ 284:558f606b08ae r21-0b40
Import from CVS: tag r21-0b40
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:34:13 +0200 |
parents | c42ec1d1cded |
children | c9fe270a4101 |
comparison
equal
deleted
inserted
replaced
283:fa3d41851a08 | 284:558f606b08ae |
---|---|
203 (widget-insert (about-center xemacs-logo)) | 203 (widget-insert (about-center xemacs-logo)) |
204 (widget-create 'default | 204 (widget-create 'default |
205 :format "%t" | 205 :format "%t" |
206 :tag-glyph xemacs-logo) | 206 :tag-glyph xemacs-logo) |
207 (widget-insert "\n") | 207 (widget-insert "\n") |
208 (let* ((emacs-short-version (concat emacs-major-version | 208 (let* ((emacs-short-version (format "%d.%d" |
209 "." emacs-minor-version)) | 209 emacs-major-version |
210 emacs-minor-version)) | |
210 (emacs-about-version (format "version %s; Apr 1998" | 211 (emacs-about-version (format "version %s; Apr 1998" |
211 emacs-short-version))) | 212 emacs-short-version))) |
212 (widget-insert (about-center emacs-about-version)) | 213 (widget-insert (about-center emacs-about-version)) |
213 (widget-create 'link :help-echo "The latest NEWS of XEmacs" | 214 (widget-create 'link :help-echo "The latest NEWS of XEmacs" |
214 :action 'about-news | 215 :action 'about-news |
1184 (about-show-linked-info 'stigb "\ | 1185 (about-show-linked-info 'stigb "\ |
1185 Currently studying computer science in Trondheim, Norway. Full time | 1186 Currently studying computer science in Trondheim, Norway. Full time |
1186 Linux user and proud of it. XEmacs hacker light. Maintainer of the | 1187 Linux user and proud of it. XEmacs hacker light. Maintainer of the |
1187 RPM package.\n") | 1188 RPM package.\n") |
1188 (about-show-linked-info 'ograf "\ | 1189 (about-show-linked-info 'ograf "\ |
1189 Is currently working on the integration of OffiX and CDE drag-and-drop | 1190 Author of the XEmacs Drag'n'Drop API.\n") |
1190 into the event system of XEmacs.\n") | |
1191 (about-show-linked-info 'juhp "\ | 1191 (about-show-linked-info 'juhp "\ |
1192 Author of \"find-func.el\".\n") | 1192 Author of \"find-func.el\".\n") |
1193 (about-show-linked-info 'jason "\ | 1193 (about-show-linked-info 'jason "\ |
1194 Beta tester and manager of the various XEmacs mailing lists. | 1194 Beta tester and manager of the various XEmacs mailing lists. |
1195 Originator and maintainer of the gnus.org domain.\n") | 1195 Originator and maintainer of the gnus.org domain.\n") |