Mercurial > emacs

comparison lisp/lpr.el @ 9900:68411c4271cd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(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.")