diff options
-rw-r--r-- | lisp/lpr.el | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/lisp/lpr.el b/lisp/lpr.el index 7f5ff8d1542..4af86a1e742 100644 --- a/lisp/lpr.el +++ b/lisp/lpr.el @@ -38,12 +38,15 @@ ;;;###autoload (defvar lpr-command - (if (memq system-type '(usg-unix-v dgux hpux irix)) + (if (and (memq system-type '(usg-unix-v dgux hpux irix)) + (not (string-match "^[^-]*-[^-]*-solaris" system-configuration))) "lp" "lpr") "*Shell command for printing a file") (defvar lpr-headers-switches - (if (memq system-type '(usg-unix-v hpux)) nil "-p") + (if (and (memq system-type '(usg-unix-v hpux)) + (not (string-match "^[^-]*-[^-]*-solaris" system-configuration))) + nil "-p") "*List of strings to use as options for `lpr' to request page headings.") (defvar print-region-function nil |