X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/d7aff0d6929c16d15992304dd44c5f528df8f895..9ae19d2f0d757db73dee35b7e675810dab7bcb37:/lisp/lpr.el diff --git a/lisp/lpr.el b/lisp/lpr.el index 0e96051715..11cc8f86cf 100644 --- a/lisp/lpr.el +++ b/lisp/lpr.el @@ -1,9 +1,9 @@ ;;; lpr.el --- print Emacs buffer on line printer -;; Copyright (C) 1985, 1988, 1992, 1994, 2001-2013 Free Software +;; Copyright (C) 1985, 1988, 1992, 1994, 2001-2015 Free Software ;; Foundation, Inc. -;; Maintainer: FSF +;; Maintainer: emacs-devel@gnu.org ;; Keywords: unix ;; This file is part of GNU Emacs. @@ -49,7 +49,7 @@ (defcustom printer-name (and (eq system-type 'ms-dos) "PRN") "The name of a local printer to which data is sent for printing. -\(Note that PostScript files are sent to `ps-printer-name', which see.\) +\(Note that PostScript files are sent to `ps-printer-name', which see.) On Unix-like systems, a string value should be a name understood by lpr's -P option; otherwise the value should be nil. @@ -161,7 +161,7 @@ See the variables `lpr-switches' and `lpr-command' for customization of the printer command." (interactive (unless (y-or-n-p "Send current buffer to default printer? ") - (error "Cancelled"))) + (error "Canceled"))) (print-region-1 (point-min) (point-max) lpr-switches nil)) ;;;###autoload @@ -180,7 +180,7 @@ See the variables `lpr-switches' and `lpr-command' for further customization of the printer command." (interactive (unless (y-or-n-p "Send current buffer to default printer? ") - (error "Cancelled"))) + (error "Canceled"))) (print-region-1 (point-min) (point-max) lpr-switches t)) ;;;###autoload @@ -191,7 +191,7 @@ for customization of the printer command." (interactive (if (y-or-n-p "Send selected text to default printer? ") (list (region-beginning) (region-end)) - (error "Cancelled"))) + (error "Canceled"))) (print-region-1 start end lpr-switches nil)) ;;;###autoload @@ -211,7 +211,7 @@ for further customization of the printer command." (interactive (if (y-or-n-p "Send selected text to default printer? ") (list (region-beginning) (region-end)) - (error "Cancelled"))) + (error "Canceled"))) (print-region-1 start end lpr-switches t)) (defun print-region-1 (start end switches page-headers)