changeset 10054:cd3eda7518f0

(lpr-page-header-switches): Use -f by default. (lpr-headers-switches): Make it a list.
author Richard M. Stallman <rms@gnu.org>
date Tue, 22 Nov 1994 21:26:19 +0000
parents 0c5b5d89288e
children cb713218845a
files lisp/lpr.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/lpr.el	Tue Nov 22 21:05:42 1994 +0000
+++ b/lisp/lpr.el	Tue Nov 22 21:26:19 1994 +0000
@@ -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 @@
 (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