# HG changeset patch
# User "Ville Skyttä <scop@xemacs.org>"
# Date 1232272553 -7200
# Node ID de0228446b18b1ff1d5a0c4411fdbae51781cf71
# Parent  774e5c7522bf0681f0ecf0ab015d9ec8dcb35486
Docstring spelling fixes.

diff -r 774e5c7522bf -r de0228446b18 lisp/ChangeLog
--- a/lisp/ChangeLog	Tue Jan 13 12:07:27 2009 +0000
+++ b/lisp/ChangeLog	Sun Jan 18 11:55:53 2009 +0200
@@ -1,3 +1,8 @@
+2009-01-18  Ville Skyttä  <scop@xemacs.org>
+
+	* font.el (font-*-p): Docstring spelling fix.
+	(set-font-*-p): Ditto.
+
 2009-01-13  Aidan Kehoe  <kehoea@parhasard.net>
 
 	* mule/mule-cmds.el (set-language-environment-coding-systems): 
diff -r 774e5c7522bf -r de0228446b18 lisp/font.el
--- a/lisp/font.el	Tue Jan 13 12:07:27 2009 +0000
+++ b/lisp/font.el	Sun Jan 18 11:55:53 2009 +0200
@@ -216,13 +216,13 @@
 	   "Bitmask for whether a font is to be rendered in %s or not."
 	   attr))
        (defun ,(intern (format "font-%s-p" attr)) (fontobj)
-	 ,(format "Whether FONTOBJ will be renderd in `%s' or not." attr)
+	 ,(format "Whether FONTOBJ will be rendered in `%s' or not." attr)
 	 (if (/= 0 (logand (font-style fontobj)
 		      ,(intern (format "font-%s-mask" attr))))
 	     t
 	   nil))
        (defun ,(intern (format "set-font-%s-p" attr)) (fontobj val)
-	 ,(format "Set whether FONTOBJ will be renderd in `%s' or not."
+	 ,(format "Set whether FONTOBJ will be rendered in `%s' or not."
 		  attr)
 	 (cond
 	  (val