Mercurial > emacs
changeset 63655:dff012365907
(ps-face-foreground-name, ps-face-background-name):
Replace aliased functions with calls where second arg `inherit' is t.
| author | Juri Linkov <juri@jurta.org> |
|---|---|
| date | Wed, 22 Jun 2005 12:06:50 +0000 |
| parents | c89e1f2b9a64 |
| children | ded0bd7f2a38 |
| files | lisp/ps-print.el |
| diffstat | 1 files changed, 4 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ps-print.el Wed Jun 22 09:52:07 2005 +0000 +++ b/lisp/ps-print.el Wed Jun 22 12:06:50 2005 +0000 @@ -1549,9 +1549,10 @@ (defvar mark-active nil) (defun ps-mark-active-p () mark-active) - (defalias 'ps-face-foreground-name 'face-foreground) - (defalias 'ps-face-background-name 'face-background) - )) + (defun ps-face-foreground-name (face) + (face-foreground face nil t)) + (defun ps-face-background-name (face) + (face-background face nil t)))) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;