# HG changeset patch # User stephent # Date 1068095475 0 # Node ID fb556d2c73441b6297053ba8649dea03b3631484 # Parent 6d925631ccc7cbbd294100c5a0a25378cad6201f [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> diff -r 6d925631ccc7 -r fb556d2c7344 lisp/ChangeLog --- 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 + + * 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 . + +2003-11-04 Stephen J. Turnbull + + * about.el (about-personal-info): Fix typo in Tony Rossini's entry. + 2003-10-29 Ville Skyttä * mule/lao-util.el (lao-transcription-pattern): diff -r 6d925631ccc7 -r fb556d2c7344 lisp/about.el --- 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 diff -r 6d925631ccc7 -r fb556d2c7344 lisp/help.el --- 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_:*]")