Commit d1a74d58 authored by Richard M. Stallman's avatar Richard M. Stallman

(describe-face): Use describe-simplify-lib-file-name.

parent 9888177f
......@@ -1297,6 +1297,7 @@ If FRAME is omitted or nil, use the selected frame."
;; 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)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment