diff options
| author | Jim Blandy | 1992-11-16 01:37:46 +0000 |
|---|---|---|
| committer | Jim Blandy | 1992-11-16 01:37:46 +0000 |
| commit | 9f0a6471ed3ef58f38b0bc74e30843856a860a14 (patch) | |
| tree | 35aa5c0b0929e674e1ab7f35338046fc2ab3e638 | |
| parent | 797a37c7cbd89e19dba30204a6b12921618efe99 (diff) | |
| download | emacs-9f0a6471ed3ef58f38b0bc74e30843856a860a14.tar.gz emacs-9f0a6471ed3ef58f38b0bc74e30843856a860a14.zip | |
* lpr.el (lpr-command, lpr-switches): Removed strings starting
with \newline; this file is loaded in loaddefs.el, and doesn't
need to follow that convention.
* lpr.el (lpr-command): Add dgux-unix to the list of systems which
want "lp".
| -rw-r--r-- | lisp/lpr.el | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/lisp/lpr.el b/lisp/lpr.el index c09b2e6102d..e8967db12a0 100644 --- a/lisp/lpr.el +++ b/lisp/lpr.el | |||
| @@ -24,12 +24,14 @@ | |||
| 24 | ;;; Code: | 24 | ;;; Code: |
| 25 | 25 | ||
| 26 | ;;;###autoload | 26 | ;;;###autoload |
| 27 | (defconst lpr-switches nil "\ | 27 | (defconst lpr-switches nil |
| 28 | *List of strings to pass as extra switch args to lpr when it is invoked.") | 28 | "*List of strings to pass as extra switch args to lpr when it is invoked.") |
| 29 | 29 | ||
| 30 | ;;;###autoload | 30 | ;;;###autoload |
| 31 | (defconst lpr-command (if (memq system-type '(usg-unix-v hpux silicon-graphics-unix)) "lp" "lpr") "\ | 31 | (defconst lpr-command |
| 32 | *Shell command for printing a file") | 32 | (if (memq system-type '(usg-unix-v dgux-unix hpux silicon-graphics-unix)) |
| 33 | "lp" "lpr") | ||
| 34 | "*Shell command for printing a file") | ||
| 33 | 35 | ||
| 34 | (defvar print-region-function nil | 36 | (defvar print-region-function nil |
| 35 | "Function to call to print the region on a printer. | 37 | "Function to call to print the region on a printer. |