Update some lisp function declarations

diff --git a/lisp/gnus/mm-extern.el b/lisp/gnus/mm-extern.el
index b7c602030d7fe82128e1810925919109f26ff323..e2f8bd4af3f5f486b8fa71ff5c0d5b6419a8774b 100644 (file)
--- a/lisp/gnus/mm-extern.el
+++ b/lisp/gnus/mm-extern.el
@@ -86,7 +86,7 @@
   (let (mm-extern-anonymous)
     (mm-extern-anon-ftp handle)))
 
-(declare-function message-goto-body "message" ())
+(declare-function message-goto-body "message" (&optional interactive))
 
 (defun mm-extern-mail-server (handle)
   (require 'message)

diff --git a/lisp/mail/hashcash.el b/lisp/mail/hashcash.el
index b5fb1aec00f992651cca292826f57680f4880bfe..37b2d94e5f56cb78cd8f12eba583b5bb17236751 100644 (file)
--- a/lisp/mail/hashcash.el
+++ b/lisp/mail/hashcash.el
@@ -133,7 +133,7 @@ For example, you may want to set this to (\"-Z2\") to reduce header length."
 
 (declare-function message-narrow-to-headers-or-head "message" ())
 (declare-function message-fetch-field "message" (header &optional not-all))
-(declare-function message-goto-eoh "message" ())
+(declare-function message-goto-eoh "message" (&optional interactive))
 (declare-function message-narrow-to-headers "message" ())
 
 (defun hashcash-token-substring ()

diff --git a/lisp/net/imap.el b/lisp/net/imap.el
index 36b96ca10af537f99148bdfd3c978e93b812d546..2a2ce8b9c973aa19967a160fe4c39f0bb4bca4fc 100644 (file)
--- a/lisp/net/imap.el
+++ b/lisp/net/imap.el
@@ -141,10 +141,10 @@
 (require 'rfc2104)
 ;; Hmm... digest-md5 is not part of Emacs.
 ;; FIXME: Should/can we use sasl-digest.el instead?
-(declare-function digest-md5-parse-digest-challenge "digest-md5")
-(declare-function digest-md5-digest-response "digest-md5")
-(declare-function digest-md5-digest-uri "digest-md5")
-(declare-function digest-md5-challenge "digest-md5")
+(declare-function digest-md5-parse-digest-challenge "ext:digest-md5")
+(declare-function digest-md5-digest-response "ext:digest-md5")
+(declare-function digest-md5-digest-uri "ext:digest-md5")
+(declare-function digest-md5-challenge "ext:digest-md5")
 
 ;; User variables.
 

diff --git a/lisp/term/w32-win.el b/lisp/term/w32-win.el
index 28eaeff6056fec0a6bb8f1a16f639f2cab3c692c..dc57160d04fe2f621b96d89fdf7d52322c5d5232 100644 (file)
--- a/lisp/term/w32-win.el
+++ b/lisp/term/w32-win.el
@@ -392,8 +392,12 @@ See the documentation of `create-fontset-from-fontset-spec' for the format.")
 
 (declare-function w32-set-clipboard-data "w32select.c"
                  (string &optional ignored))
-(declare-function w32-get-clipboard-data "w32select.c")
-(declare-function w32-selection-exists-p "w32select.c")
+(declare-function w32-get-clipboard-data "w32select.c"
+                  (&optional ignored))
+(declare-function w32-selection-exists-p "w32select.c"
+                  (&optional selection terminal))
+(declare-function w32-selection-targets "w32select.c"
+                  (&optional selection terminal))
 
 ;;; Fix interface to (X-specific) mouse.el
 (defun w32--set-selection (type value)

diff --git a/lisp/vc/ediff.el b/lisp/vc/ediff.el
index cd2b2c4e62888c76982000960127a2710ae929ce..a5e8022f1c8effb97df652d766a54d02e0b7fb0d 100644 (file)
--- a/lisp/vc/ediff.el
+++ b/lisp/vc/ediff.el
@@ -153,7 +153,7 @@
 (declare-function dired-get-filename "dired"
                   (&optional localp no-error-if-not-filep))
 (declare-function dired-get-marked-files "dired"
-                  (&optional localp arg filter distinguish-one-marked))
+                  (&optional localp arg filter distinguish-one-marked error))
 
 ;; Return a plausible default for ediff's first file:
 ;; In dired, return the file number FILENO (or 0) in the list