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

supports it.

2 files changed, 6 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 05c421815f7..5f56d7ab627 100644
--- 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,Ad(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 eb15bc7726f..e534c6998a7 100644
--- 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)