changeset 66351:fc5672d9fc45

(describe-face): Use describe-simplify-lib-file-name.
author Richard M. Stallman <rms@gnu.org>
date Sun, 23 Oct 2005 19:12:50 +0000
parents 65603aeca64d
children c2d76d4f59b4
files lisp/faces.el
diffstat 1 files changed, 1 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/faces.el	Sun Oct 23 19:12:10 2005 +0000
+++ b/lisp/faces.el	Sun Oct 23 19:12:50 2005 +0000
@@ -1297,6 +1297,7 @@
 	      ;; The next 4 sexps are copied from describe-function-1
 	      ;; and simplified.
 	      (setq file-name (symbol-file f 'defface))
+	      (setq file-name (describe-simplify-lib-file-name file-name))
 	      (when file-name
 		(princ "Defined in `")
 		(princ file-name)