Don’t create unnecessary marker in ‘delete-trailing-whitespace’

[gnu-emacs] / lisp / w32-fns.el

diff --git a/lisp/w32-fns.el b/lisp/w32-fns.el
index 4815f4b8c217f8b0761acb7f6695105700d07e63..3c524e76d42d0b0f69e49690fe9413f8e5231b34 100644 (file)
--- a/lisp/w32-fns.el
+++ b/lisp/w32-fns.el
@@ -31,9 +31,9 @@
 
 ;;;; Function keys
 
-(declare-function set-message-beep "w32fns.c")
-(declare-function w32-get-locale-info "w32proc.c")
-(declare-function w32-get-valid-locale-ids "w32proc.c")
+(declare-function set-message-beep "w32fns.c" (sound))
+(declare-function w32-get-locale-info "w32proc.c" (lcid &optional longform))
+(declare-function w32-get-valid-locale-ids "w32proc.c" ())
 
 ;; Map all versions of a filename (8.3, longname, mixed case) to the
 ;; same buffer.
@@ -143,7 +143,7 @@ You should set this to t when using a non-system shell.\n\n"))))
                        '(undecided-dos . undecided-dos)
                      '(raw-text-dos . raw-text-dos)))))
 (define-obsolete-function-alias 'set-default-process-coding-system
-  #'w32-set-default-process-coding-system "26.1")
+  #'w32-set-default-process-coding-system "25.2")
 (add-hook 'before-init-hook #'w32-set-default-process-coding-system)
 
 
@@ -235,7 +235,7 @@ This function is provided for backward compatibility, since
   (check-coding-system coding-system)
   (setq locale-coding-system coding-system))
 (define-obsolete-function-alias 'set-w32-system-coding-system
-  #'w32-set-system-coding-system "26.1")
+  #'w32-set-system-coding-system "25.2")
 
 ;; locale-coding-system was introduced to do the same thing as
 ;; w32-system-coding-system. Use that instead.