# HG changeset patch
# User Juri Linkov <juri@jurta.org>
# Date 1119442010 0
# Node ID dff0123659077ff9b72a1de19e951dad8a89137e
# Parent  c89e1f2b9a6476177607cadba64a35988d661c69
(ps-face-foreground-name, ps-face-background-name):
Replace aliased functions with calls where second arg `inherit' is t.

diff -r c89e1f2b9a64 -r dff012365907 lisp/ps-print.el
--- 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))))
 
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;