25 |
|
|
26 |
;;; Code: |
;;; Code: |
27 |
|
|
28 |
(require 'url) |
;; (require 'url) |
29 |
(require 'url-parse) |
(eval-when-compile (require 'url-parse)) |
30 |
(require 'url-util) |
;; (require 'url-util) |
31 |
(require 'mm-decode) |
(eval-when-compile (require 'mm-decode)) |
32 |
(require 'mailcap) |
;; (require 'mailcap) |
33 |
|
;; The following functions in the byte compiler's warnings are known not |
34 |
|
;; to cause any real problem for the following reasons: |
35 |
|
;; - mm-save-part-to-file, mm-destroy-parts: always used |
36 |
|
;; after mm-dissect-buffer and defined in the same file. |
37 |
|
;; The following are autoloaded instead of `require'd to avoid eagerly |
38 |
|
;; loading all of URL when turning on url-handler-mode in the .emacs. |
39 |
|
(autoload 'url-retrieve-synchronously "url" "Retrieve url synchronously.") |
40 |
|
(autoload 'url-expand-file-name "url-expand" "Convert url to a fully specified url, and canonicalize it.") |
41 |
|
(autoload 'mm-dissect-buffer "mm-decode" "Dissect the current buffer and return a list of MIME handles.") |
42 |
|
(autoload 'url-scheme-get-property "url-methods" "Get property of a URL SCHEME.") |
43 |
|
|
44 |
(eval-when-compile |
(eval-when-compile |
45 |
(require 'cl)) |
(require 'cl)) |