# HG changeset patch
# User Colin Walters <walters@gnu.org>
# Date 1023570180 0
# Node ID 5981072a9e22931f0ac5a267713075f2fbcb23bd
# Parent  bac6738f3c278c7dad6bb3003728c672b1feae4b
(describe-char-after): Use `font-lock-face' to italicize property names.

diff -r bac6738f3c27 -r 5981072a9e22 lisp/international/mule-diag.el
--- a/lisp/international/mule-diag.el	Sat Jun 08 21:00:53 2002 +0000
+++ b/lisp/international/mule-diag.el	Sat Jun 08 21:03:00 2002 +0000
@@ -673,8 +673,9 @@
 			   (lambda (a b)
 			     (< (length (cdr a))
 				(length (cdr b))))))
-	  (insert (format "  %s: %s\n" (car elt) (cdr elt))))
-	))))
+	  (insert (format "  %s: %s\n" (propertize (symbol-name (car elt))
+						   'font-lock-face 'italic)
+			  (cdr elt))))))))
 
 
 ;;; CODING-SYSTEM