diff options
| author | Richard M. Stallman <rms@gnu.org> | 1994-08-19 04:38:14 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1994-08-19 04:38:14 +0000 |
| commit | ffc74f20c91fe34c70facda5da4ee05ac2c80c56 (patch) | |
| tree | 3cc1aaf2b7131a216d6d56943ab90e5745e51a09 /lisp/lpr.el | |
| parent | 0ef2c2f2e63e6d5e173b076bca140ef0bc112df3 (diff) | |
| download | emacs-ffc74f20c91fe34c70facda5da4ee05ac2c80c56.tar.gz | |
(lpr-command, lpr-headers-switches): Undo previous change.
Diffstat (limited to 'lisp/lpr.el')
| -rw-r--r-- | lisp/lpr.el | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/lisp/lpr.el b/lisp/lpr.el index 4af86a1e742..7f5ff8d1542 100644 --- a/lisp/lpr.el +++ b/lisp/lpr.el @@ -38,15 +38,12 @@ ;;;###autoload (defvar lpr-command - (if (and (memq system-type '(usg-unix-v dgux hpux irix)) - (not (string-match "^[^-]*-[^-]*-solaris" system-configuration))) + (if (memq system-type '(usg-unix-v dgux hpux irix)) "lp" "lpr") "*Shell command for printing a file") (defvar lpr-headers-switches - (if (and (memq system-type '(usg-unix-v hpux)) - (not (string-match "^[^-]*-[^-]*-solaris" system-configuration))) - nil "-p") + (if (memq system-type '(usg-unix-v hpux)) nil "-p") "*List of strings to use as options for `lpr' to request page headings.") (defvar print-region-function nil |