* lisp/url/url.el (mm-dissect-buffer, mm-display-part): Declare.
This commit is contained in:
parent
f87b128460
commit
be32a13ff5
2 changed files with 9 additions and 0 deletions
|
@ -1,3 +1,7 @@
|
|||
2013-05-23 Glenn Morris <rgm@gnu.org>
|
||||
|
||||
* url.el (mm-dissect-buffer, mm-display-part): Declare.
|
||||
|
||||
2013-05-22 Glenn Morris <rgm@gnu.org>
|
||||
|
||||
* url-handlers.el (mm-save-part-to-file, mm-destroy-parts)
|
||||
|
|
|
@ -290,6 +290,11 @@ no further processing). URL is either a string or a parsed URL."
|
|||
(get-buffer-process asynch-buffer)))))))
|
||||
asynch-buffer)))
|
||||
|
||||
;; url-mm-callback called from url-mm, which requires mm-decode.
|
||||
(declare-function mm-dissect-buffer "mm-decode"
|
||||
(&optional no-strict-mime loose-mime from))
|
||||
(declare-function mm-display-part "mm-decode" (handle &optional no-default))
|
||||
|
||||
(defun url-mm-callback (&rest ignored)
|
||||
(let ((handle (mm-dissect-buffer t)))
|
||||
(url-mark-buffer-as-dead (current-buffer))
|
||||
|
|
Loading…
Add table
Reference in a new issue