Mercurial > emacs

changeset 26384:b23b59eb6a78

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(ps-mode-print-function): Changed default lpr-command to "lp" for some system-types. (copied from lpr.el Emacs version 20.2.1).
author Gerd Moellmann <gerd@gnu.org>
date Tue, 09 Nov 1999 13:37:57 +0000
parents b39b3e14d3b4
children e52f7eedc5b0
files lisp/progmodes/ps-mode.el
diffstat 1 files changed, 4 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/ps-mode.el	Mon Nov 08 17:14:11 1999 +0000
+++ b/lisp/progmodes/ps-mode.el	Tue Nov 09 13:37:57 1999 +0000
@@ -5,7 +5,7 @@
 ;; Author:     Peter Kleiweg <kleiweg@let.rug.nl>
 ;; Maintainer: Peter Kleiweg <kleiweg@let.rug.nl>
 ;; Created:    20 Aug 1997
-;; Version:    1.1b, 18 Oct 1999
+;; Version:    1.1c, 5 Nov 1999
 ;; Keywords:   PostScript, languages
 
 ;; This file is part of GNU Emacs.
@@ -30,7 +30,7 @@
 
 ;;; Code:
 
-(defconst ps-mode-version "1.1b, 18 Oct 1999")
+(defconst ps-mode-version "1.1c, 5 Nov 1999")
 
 (require 'easymenu)
 
@@ -106,7 +106,8 @@
 (defcustom ps-mode-print-function 
   '(lambda ()
      (let ((lpr-switches nil)
-	   (lpr-command "lpr"))
+	   (lpr-command (if (memq system-type '(usg-unix-v dgux hpux irix))
+			    "lp" "lpr")))
        (lpr-buffer)))
   "*Lisp function to print current buffer as PostScript."
   :group 'PostScript-edit