[AC21.5] font-lock-warning-face undefined

[Vin Shelton]

APPROVE COMMIT 21.5

---------- Forwarded message ----------
From: Hans de Graaff <graaff at gentoo.org>
Date: Jun 23, 2007 6:42 AM
Subject: font-lock-warning-face undefined
To: xemacs-beta at xemacs.org


Hi,

I just found out that font-lock-warning-face is defined in list/font-
lock.el, but in such a way that code can't make use of it, as there seems
to be one part missing. The following patch fixes things (needs to be
applied to both 21.4 and 21.5).

And yes, I do need this for horrid FSF compatibility reasons. :-)

Kind regards,

Hans

Index: font-lock.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/font-lock.el,v
retrieving revision 1.31
diff -u -B -r1.31 font-lock.el
--- lisp/font-lock.el   2006/11/01 23:14:33     1.31
+++ lisp/font-lock.el   2007/06/23 07:14:17
@@ -721,6 +721,11 @@
 It is present only for horrid FSF compatibility reasons.
 The corresponding face should be set using `edit-faces' or the
 `set-face-*' functions.")
+(defvar font-lock-warning-face 'font-lock-warning-face
+  "This variable should not be set.
+It is present only for horrid FSF compatibility reasons.
+The corresponding face should be set using `edit-faces' or the
+`set-face-*' functions.")

 (defconst font-lock-face-list
   '(font-lock-comment-face

_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta at xemacs.org
http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-beta



-- 
The Journey by Mary Oliver
http://www.poemhunter.com/p/m/poem.asp?poet=6771&poem=30506