diff options
| author | Glenn Morris <rgm@gnu.org> | 2007-12-09 02:10:57 +0000 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2007-12-09 02:10:57 +0000 |
| commit | 49ad38a13c6bb79874fda023f4e60a2b7ac6db43 (patch) | |
| tree | 26a98e270f21d1c5b3415b344bed8ec87048f09f /lisp/gnus/mm-view.el | |
| parent | b43906b677ba264cd3ca6324b6cd6ec1505b5bbb (diff) | |
| download | emacs-49ad38a13c6bb79874fda023f4e60a2b7ac6db43.tar.gz | |
(declare-function): Add compatibility declaration.
(w3-do-setup, w3-region, w3-prepare-buffer, w3m-detect-meta-charset)
(w3m-region): Declare as functions.
Diffstat (limited to 'lisp/gnus/mm-view.el')
| -rw-r--r-- | lisp/gnus/mm-view.el | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/lisp/gnus/mm-view.el b/lisp/gnus/mm-view.el index cb4f42dabcf..04e72dffa27 100644 --- a/lisp/gnus/mm-view.el +++ b/lisp/gnus/mm-view.el @@ -24,7 +24,8 @@ ;;; Commentary: ;;; Code: - +(eval-and-compile + (unless (fboundp 'declare-function) (defmacro declare-function (&rest r)))) (eval-when-compile (require 'cl)) (require 'mail-parse) (require 'mailcap) @@ -117,6 +118,11 @@ (defalias 'mm-inline-image 'mm-inline-image-xemacs) (defalias 'mm-inline-image 'mm-inline-image-emacs))) +;; External. +(declare-function w3-do-setup "ext:w3" ()) +(declare-function w3-region "ext:w3-display" (st nd)) +(declare-function w3-prepare-buffer "ext:w3-display" (&rest args)) + (defvar mm-w3-setup nil) (defun mm-setup-w3 () (unless mm-w3-setup @@ -201,6 +207,10 @@ (defvar mm-w3m-setup nil "Whether gnus-article-mode has been setup to use emacs-w3m.") +;; External. +(declare-function w3m-detect-meta-charset "ext:w3m" ()) +(declare-function w3m-region "ext:w3m" (start end &optional url charset)) + (defun mm-setup-w3m () "Setup gnus-article-mode to use emacs-w3m." (unless mm-w3m-setup |