mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-13 16:38:14 +00:00
* 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".
This commit is contained in:
parent
797a37c7cb
commit
9f0a6471ed
10
lisp/lpr.el
10
lisp/lpr.el
@ -24,12 +24,14 @@
|
||||
;;; Code:
|
||||
|
||||
;;;###autoload
|
||||
(defconst lpr-switches nil "\
|
||||
*List of strings to pass as extra switch args to lpr when it is invoked.")
|
||||
(defconst lpr-switches nil
|
||||
"*List of strings to pass as extra switch args to lpr when it is invoked.")
|
||||
|
||||
;;;###autoload
|
||||
(defconst lpr-command (if (memq system-type '(usg-unix-v hpux silicon-graphics-unix)) "lp" "lpr") "\
|
||||
*Shell command for printing a file")
|
||||
(defconst lpr-command
|
||||
(if (memq system-type '(usg-unix-v dgux-unix hpux silicon-graphics-unix))
|
||||
"lp" "lpr")
|
||||
"*Shell command for printing a file")
|
||||
|
||||
(defvar print-region-function nil
|
||||
"Function to call to print the region on a printer.
|
||||
|
Loading…
Reference in New Issue
Block a user