Mercurial > emacs
comparison lisp/lpr.el @ 9900:68411c4271cd
(lpr-headers-switches): Base default on lpr-command value.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sun, 13 Nov 1994 12:15:29 +0000 |
parents | 8cf9181c119e |
children | cd3eda7518f0 |
comparison
equal
deleted
inserted
replaced
9899:5db59a2f9370 | 9900:68411c4271cd |
---|---|
41 (if (memq system-type '(usg-unix-v dgux hpux irix)) | 41 (if (memq system-type '(usg-unix-v dgux hpux irix)) |
42 "lp" "lpr") | 42 "lp" "lpr") |
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 (memq system-type '(usg-unix-v dgux hpux irix)) nil "-p") | 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 |
50 "Function to call to print the region on a printer. | 50 "Function to call to print the region on a printer. |
51 See definition of `print-region-1' for calling conventions.") | 51 See definition of `print-region-1' for calling conventions.") |