diff options
| author | Glenn Morris | 2018-02-26 13:35:30 -0500 |
|---|---|---|
| committer | Glenn Morris | 2018-02-26 13:35:30 -0500 |
| commit | 2ea62d635dd71ddb3368dd743ea9deb2bd68d34d (patch) | |
| tree | 0854067a32dc177f8e3d7774b2c5b25a817c8617 /lisp | |
| parent | 25271a63a01f5cfd7983713fb7a67b21c3c72b1c (diff) | |
| download | emacs-2ea62d635dd71ddb3368dd743ea9deb2bd68d34d.tar.gz emacs-2ea62d635dd71ddb3368dd743ea9deb2bd68d34d.zip | |
Update some lisp function declarations
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/gnus/mm-extern.el | 2 | ||||
| -rw-r--r-- | lisp/mail/hashcash.el | 2 | ||||
| -rw-r--r-- | lisp/net/imap.el | 8 | ||||
| -rw-r--r-- | lisp/term/w32-win.el | 8 | ||||
| -rw-r--r-- | lisp/vc/ediff.el | 2 |
5 files changed, 13 insertions, 9 deletions
diff --git a/lisp/gnus/mm-extern.el b/lisp/gnus/mm-extern.el index b7c602030d7..e2f8bd4af3f 100644 --- a/lisp/gnus/mm-extern.el +++ b/lisp/gnus/mm-extern.el | |||
| @@ -86,7 +86,7 @@ | |||
| 86 | (let (mm-extern-anonymous) | 86 | (let (mm-extern-anonymous) |
| 87 | (mm-extern-anon-ftp handle))) | 87 | (mm-extern-anon-ftp handle))) |
| 88 | 88 | ||
| 89 | (declare-function message-goto-body "message" ()) | 89 | (declare-function message-goto-body "message" (&optional interactive)) |
| 90 | 90 | ||
| 91 | (defun mm-extern-mail-server (handle) | 91 | (defun mm-extern-mail-server (handle) |
| 92 | (require 'message) | 92 | (require 'message) |
diff --git a/lisp/mail/hashcash.el b/lisp/mail/hashcash.el index b5fb1aec00f..37b2d94e5f5 100644 --- 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." | |||
| 133 | 133 | ||
| 134 | (declare-function message-narrow-to-headers-or-head "message" ()) | 134 | (declare-function message-narrow-to-headers-or-head "message" ()) |
| 135 | (declare-function message-fetch-field "message" (header &optional not-all)) | 135 | (declare-function message-fetch-field "message" (header &optional not-all)) |
| 136 | (declare-function message-goto-eoh "message" ()) | 136 | (declare-function message-goto-eoh "message" (&optional interactive)) |
| 137 | (declare-function message-narrow-to-headers "message" ()) | 137 | (declare-function message-narrow-to-headers "message" ()) |
| 138 | 138 | ||
| 139 | (defun hashcash-token-substring () | 139 | (defun hashcash-token-substring () |
diff --git a/lisp/net/imap.el b/lisp/net/imap.el index 36b96ca10af..2a2ce8b9c97 100644 --- a/lisp/net/imap.el +++ b/lisp/net/imap.el | |||
| @@ -141,10 +141,10 @@ | |||
| 141 | (require 'rfc2104) | 141 | (require 'rfc2104) |
| 142 | ;; Hmm... digest-md5 is not part of Emacs. | 142 | ;; Hmm... digest-md5 is not part of Emacs. |
| 143 | ;; FIXME: Should/can we use sasl-digest.el instead? | 143 | ;; FIXME: Should/can we use sasl-digest.el instead? |
| 144 | (declare-function digest-md5-parse-digest-challenge "digest-md5") | 144 | (declare-function digest-md5-parse-digest-challenge "ext:digest-md5") |
| 145 | (declare-function digest-md5-digest-response "digest-md5") | 145 | (declare-function digest-md5-digest-response "ext:digest-md5") |
| 146 | (declare-function digest-md5-digest-uri "digest-md5") | 146 | (declare-function digest-md5-digest-uri "ext:digest-md5") |
| 147 | (declare-function digest-md5-challenge "digest-md5") | 147 | (declare-function digest-md5-challenge "ext:digest-md5") |
| 148 | 148 | ||
| 149 | ;; User variables. | 149 | ;; User variables. |
| 150 | 150 | ||
diff --git a/lisp/term/w32-win.el b/lisp/term/w32-win.el index 28eaeff6056..dc57160d04f 100644 --- 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.") | |||
| 392 | 392 | ||
| 393 | (declare-function w32-set-clipboard-data "w32select.c" | 393 | (declare-function w32-set-clipboard-data "w32select.c" |
| 394 | (string &optional ignored)) | 394 | (string &optional ignored)) |
| 395 | (declare-function w32-get-clipboard-data "w32select.c") | 395 | (declare-function w32-get-clipboard-data "w32select.c" |
| 396 | (declare-function w32-selection-exists-p "w32select.c") | 396 | (&optional ignored)) |
| 397 | (declare-function w32-selection-exists-p "w32select.c" | ||
| 398 | (&optional selection terminal)) | ||
| 399 | (declare-function w32-selection-targets "w32select.c" | ||
| 400 | (&optional selection terminal)) | ||
| 397 | 401 | ||
| 398 | ;;; Fix interface to (X-specific) mouse.el | 402 | ;;; Fix interface to (X-specific) mouse.el |
| 399 | (defun w32--set-selection (type value) | 403 | (defun w32--set-selection (type value) |
diff --git a/lisp/vc/ediff.el b/lisp/vc/ediff.el index cd2b2c4e628..a5e8022f1c8 100644 --- a/lisp/vc/ediff.el +++ b/lisp/vc/ediff.el | |||
| @@ -153,7 +153,7 @@ | |||
| 153 | (declare-function dired-get-filename "dired" | 153 | (declare-function dired-get-filename "dired" |
| 154 | (&optional localp no-error-if-not-filep)) | 154 | (&optional localp no-error-if-not-filep)) |
| 155 | (declare-function dired-get-marked-files "dired" | 155 | (declare-function dired-get-marked-files "dired" |
| 156 | (&optional localp arg filter distinguish-one-marked)) | 156 | (&optional localp arg filter distinguish-one-marked error)) |
| 157 | 157 | ||
| 158 | ;; Return a plausible default for ediff's first file: | 158 | ;; Return a plausible default for ediff's first file: |
| 159 | ;; In dired, return the file number FILENO (or 0) in the list | 159 | ;; In dired, return the file number FILENO (or 0) in the list |