diff options
author | Richard M. Stallman <rms@gnu.org> | 1994-11-22 21:26:19 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1994-11-22 21:26:19 +0000 |
commit | 3cdcc6111bf80bbc9468c90ea4bf351683dd2676 (patch) | |
tree | 663e2309fa1e1b5d83059dbf77ea52a886ef67c0 /lisp | |
parent | feebcb337b8716e46f9db9fad523588b5d470354 (diff) | |
download | emacs-3cdcc6111bf80bbc9468c90ea4bf351683dd2676.tar.gz |
(lpr-page-header-switches): Use -f by default.
(lpr-headers-switches): Make it a list.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/lpr.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/lpr.el b/lisp/lpr.el index 4299ef1d30f..c5d9bb2205e 100644 --- a/lisp/lpr.el +++ b/lisp/lpr.el @@ -43,7 +43,7 @@ "*Name of program for printing a file.") (defvar lpr-headers-switches - (if (equal lpr-command "lpr") "-p" nil) + (if (equal lpr-command "lpr") '("-p") nil) "*List of strings to use as options for `lpr' to request page headings.") (defvar print-region-function nil @@ -53,7 +53,7 @@ See definition of `print-region-1' for calling conventions.") (defvar lpr-page-header-program "pr" "*Name of program for adding page headers to a file.") -(defvar lpr-page-header-switches nil +(defvar lpr-page-header-switches '("-f") "*List of strings to use as options for `lpr-page-header-program'.") ;;;###autoload |