mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-12-27 10:54:40 +00:00
(print-region-1): When running pr, use -h always.
This commit is contained in:
parent
240e9cda7d
commit
887bbf181d
@ -157,8 +157,7 @@ The variable `lpr-page-header-program' specifies the program to use."
|
|||||||
(setq start (car new-coords) end (cdr new-coords)))
|
(setq start (car new-coords) end (cdr new-coords)))
|
||||||
(apply 'call-process-region start end lpr-page-header-program
|
(apply 'call-process-region start end lpr-page-header-program
|
||||||
t t nil
|
t t nil
|
||||||
(nconc (and lpr-add-switches
|
(nconc (list "-h" title)
|
||||||
(list "-h" title))
|
|
||||||
lpr-page-header-switches))
|
lpr-page-header-switches))
|
||||||
(setq start (point-min) end (point-max))))
|
(setq start (point-min) end (point-max))))
|
||||||
(apply (or print-region-function 'call-process-region)
|
(apply (or print-region-function 'call-process-region)
|
||||||
|
Loading…
Reference in New Issue
Block a user