From: Colin Walters <walters@gnu.org>
Date: Sat, 8 Jun 2002 21:03:00 +0000 (+0000)
Subject: (describe-char-after): Use `font-lock-face' to italicize property names.
X-Git-Tag: ttn-vms-21-2-B4~14722
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=18870afc4f5e453be82f648f1f0cd5edbe41b510;p=emacs.git

(describe-char-after): Use `font-lock-face' to italicize property names.
---

diff --git a/lisp/international/mule-diag.el b/lisp/international/mule-diag.el
index 055da29a83e..2082734983d 100644
--- a/lisp/international/mule-diag.el
+++ b/lisp/international/mule-diag.el
@@ -673,8 +673,9 @@ which font is being used for displaying the character."
 			   (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