# HG changeset patch
# User Jim Blandy <jimb@redhat.com>
# Date 721877866 0
# Node ID 21e2defc55c009c4343b0503ef5ac907f38c2c47
# Parent  567e76c81b0cc3641886ec118ce84ca0477659e1
	* 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".

diff -r 567e76c81b0c -r 21e2defc55c0 lisp/lpr.el
--- a/lisp/lpr.el	Mon Nov 16 01:37:06 1992 +0000
+++ b/lisp/lpr.el	Mon Nov 16 01:37:46 1992 +0000
@@ -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.