1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-26 10:49:33 +00:00

(print-region-1): When running pr, use -h always.

This commit is contained in:
Karl Heuer 1997-11-19 04:25:20 +00:00
parent 240e9cda7d
commit 887bbf181d

View File

@ -157,8 +157,7 @@ The variable `lpr-page-header-program' specifies the program to use."
(setq start (car new-coords) end (cdr new-coords)))
(apply 'call-process-region start end lpr-page-header-program
t t nil
(nconc (and lpr-add-switches
(list "-h" title))
(nconc (list "-h" title)
lpr-page-header-switches))
(setq start (point-min) end (point-max))))
(apply (or print-region-function 'call-process-region)