Mercurial > emacs
diff lisp/faces.el @ 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 | a9f7501916e6 |
| children | fcb2ec449238 |
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)