Mercurial > emacs
changeset 13886:d7591ab6c259
(ps-do-despool): Alternative output method for MSDOS.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Fri, 29 Dec 1995 04:14:10 +0000 |
| parents | bcb436f256e3 |
| children | 4362f8b4f83c |
| files | lisp/ps-print.el |
| diffstat | 1 files changed, 5 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ps-print.el Fri Dec 29 03:36:35 1995 +0000 +++ b/lisp/ps-print.el Fri Dec 29 04:14:10 1995 +0000 @@ -1868,9 +1868,11 @@ (message "Printing...")) (save-excursion (set-buffer ps-spool-buffer) - (apply 'call-process-region - (point-min) (point-max) ps-lpr-command nil 0 nil - ps-lpr-switches)) + (if (eq system-type 'ms-dos) + (write-region (point-min) (point-max) "PRN") + (apply 'call-process-region + (point-min) (point-max) ps-lpr-command nil 0 nil + ps-lpr-switches))) (if ps-razzle-dazzle (message "Printing...done"))) (kill-buffer ps-spool-buffer)))