(help-argument-name): Inherit from italic face only if the frame

supports it.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 05c421815f7951acb7d6e61c5f56b78d38bc3cbd..5f56d7ab627609ba7ea07122cec32bcee753afc5 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2004-06-06  Juanma Barranquero  <lektu@terra.es>
+
+       * help-fns.el (help-argument-name): Inherit from italic face only
+       if the frame supports it.
+
 2004-06-06  Jan Dj\e,Ad\e(Brv  <jan.h.d@swipnet.se>
 
        * toolbar/alias.pbm toolbar/close.pbm toolbar/copy.pbm toolbar/cut.pbm

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index eb15bc7726fdc569c3f2514fe62c115fa4556a0a..e534c6998a76e04d545dd7950b99a5e848eea3e2 100644 (file)
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -238,7 +238,7 @@ KIND should be `var' for a variable or `subr' for a subroutine."
          file)))))
 
 ;;;###autoload
-(defface help-argument-name '((t :inherit italic))
+(defface help-argument-name '((((supports :slant italic)) :inherit italic))
   "Face to highlight argument names in *Help* buffers."
   :group 'help)