mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-25 10:47:00 +00:00
Code Issues Releases Activity

* w32-fns.el (w32-quote-process-args):

Browse Source 
* dos-w32.el (print-region-function, lpr-headers-switches)
(ps-print-region-function): Pacify byte-compiler.
This commit is contained in:
Dan Nicolaescu 2007-10-21 19:35:11 +00:00
parent f82460271e
commit 200fe89b7c
3 changed files with 9 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/ChangeLog
View File

@ -1,5 +1,9 @@
2007-10-21 Dan Nicolaescu <dann@ics.uci.edu>
* w32-fns.el (w32-quote-process-args):
* dos-w32.el (print-region-function, lpr-headers-switches)
(ps-print-region-function): Pacify byte-compiler.
* emulation/edt-mapper.el (function-key-map):
(edt-map-key): Make it a function instead of using fset. Inline
edt-gnu-map-key and edt-lucid-map-key. Use featurep 'xemacs.

3
lisp/dos-w32.el
View File

@ -404,6 +404,8 @@ indicates a specific program should be invoked."
(direct-print-region-helper printer start end lpr-prog
delete-text buf display rest)))
(defvar print-region-function)
(defvar lpr-headers-switches)
(setq print-region-function 'direct-print-region-function)
;; Set this to nil if you have a port of the `pr' program
@ -435,6 +437,7 @@ indicates a specific program should be invoked."
(direct-print-region-helper printer start end lpr-prog
delete-text buf display rest)))
(defvar ps-print-region-function)
(setq ps-print-region-function 'direct-ps-print-region-function)
;(setq ps-lpr-command "gs")

2
lisp/w32-fns.el
View File

@ -82,6 +82,8 @@ That includes all Windows systems except for 9X/Me."
'("cmdproxy" "cmdproxy.exe"))
(w32-system-shell-p (getenv "COMSPEC")))))
(defvar w32-quote-process-args) ;; defined in w32proc.c
(defun w32-check-shell-configuration ()
"Check the configuration of shell variables on Windows NT/9X.
This function is invoked after loading the init files and processing