summaryrefslogtreecommitdiff
path: root/lisp/lpr.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2013-10-29 22:45:53 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2013-10-29 22:45:53 -0400
commitae4002ce294f21a82979edacef39f82d8e4cd1cc (patch)
treed0f2e23db27b13aeb9066c534661f04032fb36d8 /lisp/lpr.el
parent53b39e8977941c6b60deeeca3c0e54da9ec7961a (diff)
downloademacs-ae4002ce294f21a82979edacef39f82d8e4cd1cc.tar.gz
Cleanup namespace of dos-w32.el.
* lisp/dos-w32.el (minibuffer-history-case-insensitive-variables) (path-separator, null-device, buffer-file-coding-system) (lpr-headers-switches): Check system-type before modifying them. (find-buffer-file-type-coding-system): Mark obsolete. (w32-find-file-not-found-set-buffer-file-coding-system): Rename from find-file-not-found-set-buffer-file-coding-system. (w32-untranslated-filesystem-list, w32-untranslated-canonical-name): (w32-add-untranslated-filesystem, w32-remove-untranslated-filesystem) (w32-direct-print-region-use-command-dot-com, w32-untranslated-file-p): (w32-direct-print-region-helper, w32-direct-print-region-function) (w32-direct-ps-print-region-function): Rename by adding a "w32-" prefix. * lisp/startup.el (normal-top-level-add-subdirs-to-load-path): * lisp/ps-print.el (ps-print-region-function): * lisp/lpr.el (print-region-function): Use new name. * lisp/simple.el (copy-region-as-kill): Fix call to region-extract-function. * lisp/emacs-lisp/bytecomp.el (byte-defop-compiler): Add new `2-and' handler. (byte-compile-and-folded): New function. (=, <, >, <=, >=): Use it.
Diffstat (limited to 'lisp/lpr.el')
-rw-r--r--lisp/lpr.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/lpr.el b/lisp/lpr.el
index 5aed3bcc484..0e960517159 100644
--- a/lisp/lpr.el
+++ b/lisp/lpr.el
@@ -132,7 +132,7 @@ and print the result."
(defcustom print-region-function
(if (memq system-type '(ms-dos windows-nt))
- #'direct-print-region-function
+ #'w32-direct-print-region-function
#'call-process-region)
"Function to call to print the region on a printer.
See definition of `print-region-1' for calling conventions."