summaryrefslogtreecommitdiff
path: root/lisp/ps-print.el
diff options
context:
space:
mode:
authorStefan Kangas <stefankangas@gmail.com>2020-08-12 15:34:13 +0200
committerStefan Kangas <stefankangas@gmail.com>2020-08-12 15:36:54 +0200
commit68ff32a51ef83d24a03dd55c66df71c0dda9010d (patch)
treef9c37426c5495fa06eb6dfbac5089a839302bb66 /lisp/ps-print.el
parentfdba95d2f8cc557b9b214c21f54bc8467900c763 (diff)
downloademacs-68ff32a51ef83d24a03dd55c66df71c0dda9010d.tar.gz
Minor cleanup in ps-def.el
* lisp/ps-def.el (ps-frame-parameter): Make alias obsolete. * lisp/ps-print.el (ps-begin-job): Adjust caller.
Diffstat (limited to 'lisp/ps-print.el')
-rw-r--r--lisp/ps-print.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/ps-print.el b/lisp/ps-print.el
index ace30017814..17b486bca11 100644
--- a/lisp/ps-print.el
+++ b/lisp/ps-print.el
@@ -5761,7 +5761,7 @@ XSTART YSTART are the relative position for the first page in a sheet.")
(eq genfunc 'ps-generate-postscript))
nil)
((eq ps-default-bg 'frame-parameter)
- (ps-frame-parameter nil 'background-color))
+ (frame-parameter nil 'background-color))
((eq ps-default-bg t)
(ps-face-background-name 'default))
(t
@@ -5775,7 +5775,7 @@ XSTART YSTART are the relative position for the first page in a sheet.")
(eq genfunc 'ps-generate-postscript))
nil)
((eq ps-default-fg 'frame-parameter)
- (ps-frame-parameter nil 'foreground-color))
+ (frame-parameter nil 'foreground-color))
((eq ps-default-fg t)
(ps-face-foreground-name 'default))
(t