diff options
| -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 @@ | |||
| 43 | "*Name of program for printing a file.") | 43 | "*Name of program for printing a file.") |
| 44 | 44 | ||
| 45 | (defvar lpr-headers-switches | 45 | (defvar lpr-headers-switches |
| 46 | (if (equal lpr-command "lpr") "-p" nil) | 46 | (if (equal lpr-command "lpr") '("-p") nil) |
| 47 | "*List of strings to use as options for `lpr' to request page headings.") | 47 | "*List of strings to use as options for `lpr' to request page headings.") |
| 48 | 48 | ||
| 49 | (defvar print-region-function nil | 49 | (defvar print-region-function nil |
| @@ -53,7 +53,7 @@ See definition of `print-region-1' for calling conventions.") | |||
| 53 | (defvar lpr-page-header-program "pr" | 53 | (defvar lpr-page-header-program "pr" |
| 54 | "*Name of program for adding page headers to a file.") | 54 | "*Name of program for adding page headers to a file.") |
| 55 | 55 | ||
| 56 | (defvar lpr-page-header-switches nil | 56 | (defvar lpr-page-header-switches '("-f") |
| 57 | "*List of strings to use as options for `lpr-page-header-program'.") | 57 | "*List of strings to use as options for `lpr-page-header-program'.") |
| 58 | 58 | ||
| 59 | ;;;###autoload | 59 | ;;;###autoload |