* frame.el (msdos-mouse-p):
* files.el (msdos-long-file-names, w32-long-file-name) (msdos-long-file-names): * term/mac-win.el (mac-code-convert-string, mac-coerce-ae-data) (mac-resume-apple-event, mac-font-panel-mode) (mac-atsu-font-face-attributes, mac-ae-set-reply-parameter) (mac-clear-font-name-table): * term/pc-win.el (msdos-remember-default-colors) (w16-set-clipboard-data, w16-get-clipboard-data): * term/w32-win.el (w32-send-sys-command, w32-select-font) (set-message-beep): * net/browse-url.el (w32-shell-execute): * dos-fns.el (int86, msdos-long-file-names): * dos-w32.el (default-printer-name): Undo previous change.
This commit is contained in:
parent
b62a39c41d
commit
99c715160b
9 changed files with 17 additions and 27 deletions
|
|
@ -1,3 +1,20 @@
|
|||
2007-11-21 Dan Nicolaescu <dann@ics.uci.edu>
|
||||
|
||||
* frame.el (msdos-mouse-p):
|
||||
* files.el (msdos-long-file-names, w32-long-file-name)
|
||||
(msdos-long-file-names):
|
||||
* term/mac-win.el (mac-code-convert-string, mac-coerce-ae-data)
|
||||
(mac-resume-apple-event, mac-font-panel-mode)
|
||||
(mac-atsu-font-face-attributes, mac-ae-set-reply-parameter)
|
||||
(mac-clear-font-name-table):
|
||||
* term/pc-win.el (msdos-remember-default-colors)
|
||||
(w16-set-clipboard-data, w16-get-clipboard-data):
|
||||
* term/w32-win.el (w32-send-sys-command, w32-select-font)
|
||||
(set-message-beep):
|
||||
* net/browse-url.el (w32-shell-execute):
|
||||
* dos-fns.el (int86, msdos-long-file-names):
|
||||
* dos-w32.el (default-printer-name): Undo previous change.
|
||||
|
||||
2007-11-21 Eli Zaretskii <eliz@gnu.org>
|
||||
|
||||
* international/mule-cmds.el (set-locale-environment): Set
|
||||
|
|
|
|||
|
|
@ -29,9 +29,6 @@
|
|||
|
||||
;;; Code:
|
||||
|
||||
(declare-function int86) ;; Defined in C.
|
||||
(declare-function msdos-long-file-names) ;; Defined in C.
|
||||
|
||||
;; This overrides a trivial definition in files.el.
|
||||
(defun convert-standard-filename (filename)
|
||||
"Convert a standard file's name to something suitable for the current OS.
|
||||
|
|
|
|||
|
|
@ -370,8 +370,6 @@ filesystem mounted on drive Z:, FILESYSTEM could be \"Z:\"."
|
|||
|
||||
(defvar printer-name)
|
||||
|
||||
(declare-function default-printer-name) ;; Defined in C.
|
||||
|
||||
(defun direct-print-region-function (start end
|
||||
&optional lpr-prog
|
||||
delete-text buf display
|
||||
|
|
|
|||
|
|
@ -213,9 +213,6 @@ have fast storage with limited space, such as a RAM disk."
|
|||
;; The system null device. (Should reference NULL_DEVICE from C.)
|
||||
(defvar null-device "/dev/null" "The system null device.")
|
||||
|
||||
(declare-function msdos-long-file-names) ;; Defined in C.
|
||||
(declare-function w32-long-file-name) ;; Defined in C.
|
||||
(declare-function msdos-long-file-names) ;; Defined in C.
|
||||
(declare-function dired-get-filename "dired" (&optional localp no-error-if-not-filep))
|
||||
(declare-function dired-unmark "dired" (arg))
|
||||
(declare-function dired-do-flagged-delete "dired" (&optional nomessage))
|
||||
|
|
|
|||
|
|
@ -1126,8 +1126,6 @@ bars (top, bottom, or nil)."
|
|||
"Return the terminal that is now selected."
|
||||
(frame-terminal (selected-frame)))
|
||||
|
||||
(declare-function msdos-mouse-p) ;; Defined in C only for on platform.
|
||||
|
||||
(defun display-mouse-p (&optional display)
|
||||
"Return non-nil if DISPLAY has a mouse available.
|
||||
DISPLAY can be a display name, a frame, or nil (meaning the selected
|
||||
|
|
|
|||
|
|
@ -825,7 +825,6 @@ to use."
|
|||
;; --- Default MS-Windows browser ---
|
||||
|
||||
(defvar dos-windows-version)
|
||||
(declare-function w32-shell-execute) ;; Defined in C.
|
||||
|
||||
(defun browse-url-default-windows-browser (url &optional new-window)
|
||||
(interactive (browse-url-interactive-arg "URL: "))
|
||||
|
|
|
|||
|
|
@ -85,14 +85,6 @@
|
|||
(defvar mac-ts-active-input-overlay)
|
||||
(defvar x-invocation-args)
|
||||
|
||||
(declare-function mac-code-convert-string) ;; Defined in C.
|
||||
(declare-function mac-coerce-ae-data) ;; Defined in C.
|
||||
(declare-function mac-resume-apple-event) ;; Defined in C.
|
||||
(declare-function mac-font-panel-mode) ;; Defined in C.
|
||||
(declare-function mac-atsu-font-face-attributes) ;; Defined in C.
|
||||
(declare-function mac-ae-set-reply-parameter) ;; Defined in C.
|
||||
(declare-function mac-clear-font-name-table) ;; Defined in C.
|
||||
|
||||
(defvar x-command-line-resources nil)
|
||||
|
||||
;; Handler for switches of the form "-switch value" or "-switch".
|
||||
|
|
|
|||
|
|
@ -29,10 +29,6 @@
|
|||
|
||||
(load "term/internal" nil t)
|
||||
|
||||
(declare-function msdos-remember-default-colors) ;; Defined in C.
|
||||
(declare-function w16-set-clipboard-data) ;; Defined in C.
|
||||
(declare-function w16-get-clipboard-data) ;; Defined in C.
|
||||
|
||||
;;; This is copied from etc/rgb.txt, except that some values were changed
|
||||
;;; a bit to make them consistent with DOS console colors, and the RGB
|
||||
;;; values were scaled up to 16 bits, as `tty-define-color' requires.
|
||||
|
|
|
|||
|
|
@ -88,10 +88,6 @@
|
|||
(defvar xlfd-regexp-registry-subnum)
|
||||
(defvar w32-color-map) ;; defined in w32fns.c
|
||||
|
||||
(declare-function w32-send-sys-command) ;; Defined in C.
|
||||
(declare-function w32-select-font) ;; Defined in C.
|
||||
(declare-function set-message-beep) ;; Defined in C.
|
||||
|
||||
;; Conditional on new-fontset so bootstrapping works on non-GUI compiles
|
||||
(if (fboundp 'new-fontset)
|
||||
(require 'fontset))
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue