diff options
author | Glenn Morris <rgm@gnu.org> | 2013-05-22 00:30:44 -0700 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2013-05-22 00:30:44 -0700 |
commit | af7422480399d1b58e778c5d25891b70cb1f43ed (patch) | |
tree | d7c3b854d7241d8d5bd5ab04b8894fdecc413b59 /lisp/url/url-handlers.el | |
parent | 6450907e01d948123a8191f117a03b37dc126638 (diff) | |
download | emacs-af7422480399d1b58e778c5d25891b70cb1f43ed.tar.gz |
Add some declarations to url-handlers.el
* lisp/url/url-handlers.el (mm-save-part-to-file, mm-destroy-parts)
(mm-decode-string, mail-content-type-get): Declare.
Diffstat (limited to 'lisp/url/url-handlers.el')
-rw-r--r-- | lisp/url/url-handlers.el | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/lisp/url/url-handlers.el b/lisp/url/url-handlers.el index 67d72bcfb61..ae807d6eab9 100644 --- a/lisp/url/url-handlers.el +++ b/lisp/url/url-handlers.el @@ -28,16 +28,20 @@ ;; (require 'url-util) (eval-when-compile (require 'mm-decode)) ;; (require 'mailcap) -;; The following functions in the byte compiler's warnings are known not -;; to cause any real problem for the following reasons: -;; - mm-save-part-to-file, mm-destroy-parts: always used -;; after mm-dissect-buffer and defined in the same file. ;; The following are autoloaded instead of `require'd to avoid eagerly ;; loading all of URL when turning on url-handler-mode in the .emacs. (autoload 'url-expand-file-name "url-expand" "Convert url to a fully specified url, and canonicalize it.") (autoload 'mm-dissect-buffer "mm-decode" "Dissect the current buffer and return a list of MIME handles.") (autoload 'url-scheme-get-property "url-methods" "Get property of a URL SCHEME.") +;; Always used after mm-dissect-buffer and defined in the same file. +(declare-function mm-save-part-to-file "mm-decode" (handle file)) +(declare-function mm-destroy-parts "mm-decode" (handles)) +;; mm-decode loads mm-bodies. +(declare-function mm-decode-string "mm-bodies" (string charset)) +;; mm-decode loads mail-parse. +(declare-function mail-content-type-get "mail-parse" (ct attribute)) + ;; Implementation status ;; --------------------- ;; Function Status |