Mercurial > hg > xemacs-beta
changeset 1779:fb556d2c7344
[xemacs-hg @ 2003-11-06 05:11:15 by stephent]
little fixes <87k76eks07.fsf@tleepslib.sk.tsukuba.ac.jp>
<87fzh2kros.fsf@tleepslib.sk.tsukuba.ac.jp>
author | stephent |
---|---|
date | Thu, 06 Nov 2003 05:11:15 +0000 |
parents | 6d925631ccc7 |
children | 3227a97effa8 |
files | lisp/ChangeLog lisp/about.el lisp/help.el |
diffstat | 3 files changed, 14 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Wed Nov 05 22:50:47 2003 +0000 +++ b/lisp/ChangeLog Thu Nov 06 05:11:15 2003 +0000 @@ -1,3 +1,14 @@ +2003-11-05 Vin Shelton <acs@xemacs.org> + + * help.el (Help-prin1-face): + (Help-princ-face): + princ and prin1 are functions and need to be called as such. The + idea for this patch was submitted by Eric Eide <eeide@cs.utah.edu>. + +2003-11-04 Stephen J. Turnbull <stephen@xemacs.org> + + * about.el (about-personal-info): Fix typo in Tony Rossini's entry. + 2003-10-29 Ville Skyttä <scop@xemacs.org> * mule/lao-util.el (lao-transcription-pattern):
--- a/lisp/about.el Wed Nov 05 22:50:47 2003 +0000 +++ b/lisp/about.el Thu Nov 06 05:11:15 2003 +0000 @@ -1304,7 +1304,7 @@ and the Fred Hutchinson Cancer Research Center. See ") - (about-url-link 'rossini nil "Visit Anothony's home page") + (about-url-link 'rossini nil "Visit Anthony's home page") (widget-insert ".\n")) (scop (widget-insert
--- a/lisp/help.el Wed Nov 05 22:50:47 2003 +0000 +++ b/lisp/help.el Thu Nov 06 05:11:15 2003 +0000 @@ -1236,7 +1236,7 @@ (princ object) (put-nonduplicable-text-property pos (marker-position standard-output) 'face face buf))) - (t princ object))) + (t (princ object)))) ;; replacement for `prin1' that puts the text in the specified face, ;; if possible @@ -1252,7 +1252,7 @@ (prin1 object) (put-nonduplicable-text-property pos (marker-position standard-output) 'face face buf))) - (t prin1 object))) + (t (prin1 object)))) (defvar help-symbol-regexp (let ((sym-char "[+a-zA-Z0-9_:*]")