* 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.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 31437fb1a38f8f4a7c27f767ad5f7fc173444dbb..6a8e8e75186cc57657b0bfc7c9a280d016a6254f 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -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

diff --git a/lisp/dos-fns.el b/lisp/dos-fns.el
index 62b7164001740f142246d679d38905f9c60cea2c..c66cbc7933a54462f3a993ee5e4d643a90f48777 100644 (file)
--- a/lisp/dos-fns.el
+++ b/lisp/dos-fns.el
@@ -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.

diff --git a/lisp/dos-w32.el b/lisp/dos-w32.el
index 4b307423fb515cd83fed290104ecc2069ca433ea..28cab4ccbcb80ea162d361f16705dbbb132d769d 100644 (file)
--- a/lisp/dos-w32.el
+++ b/lisp/dos-w32.el
@@ -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

diff --git a/lisp/files.el b/lisp/files.el
index 7575948b9db25115dcf4d20736851cafd337718b..276366a796f269d7ef834847fa869e6dcef0e92a 100644 (file)
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -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))

diff --git a/lisp/frame.el b/lisp/frame.el
index 6e660b1b5e55d3fcfcbac751b558275d9218fb6e..1c11829475bd81e08920dcc74b76c675bbb0f412 100644 (file)
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -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

diff --git a/lisp/net/browse-url.el b/lisp/net/browse-url.el
index 977639eec5543c3884156535fe3590d91a7956b7..523588ec7c28cac8639e0ff4567bfabc7226160c 100644 (file)
--- a/lisp/net/browse-url.el
+++ b/lisp/net/browse-url.el
@@ -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: "))

diff --git a/lisp/term/mac-win.el b/lisp/term/mac-win.el
index 050bd04d59ec8233928d80da832d9c13c62da963..c84614d2246dc3d3c14a94120a37e7c10780d055 100644 (file)
--- a/lisp/term/mac-win.el
+++ b/lisp/term/mac-win.el
@@ -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".

diff --git a/lisp/term/pc-win.el b/lisp/term/pc-win.el
index d9ed73855144145dbaac2158969c3aeb172373b7..ecbda7d9c1e18d75e3a2e020e9983c13cfbde324 100644 (file)
--- a/lisp/term/pc-win.el
+++ b/lisp/term/pc-win.el
@@ -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.

diff --git a/lisp/term/w32-win.el b/lisp/term/w32-win.el
index 7fd84a898fc43b6812478356434c4dc90b1da7be..b98326dcd3e9391764afb95093fa2d499bb39059 100644 (file)
--- a/lisp/term/w32-win.el
+++ b/lisp/term/w32-win.el
@@ -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))