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_:*]")