Add declare-function compatibility definition.

(widget-button-press, gnus-make-hashtable): Autoload.
(widget-event-point, gnus-configure-windows): Declare as functions.

1 files changed, 10 insertions, 0 deletions

diff --git a/lisp/gnus/mml.el b/lisp/gnus/mml.el
index 092827c570d..ec37c2b7560 100644
--- a/lisp/gnus/mml.el
+++ b/lisp/gnus/mml.el
@@ -25,6 +25,10 @@
 
 ;;; Code:
 
+;; For Emacs < 22.2.
+(eval-and-compile
+  (unless (fboundp 'declare-function) (defmacro declare-function (&rest r))))
+
 (require 'mm-util)
 (require 'mm-bodies)
 (require 'mm-encode)
@@ -1316,6 +1320,12 @@ Should be adopted if code in `message-send-mail' is changed."
 
 (defvar mml-preview-buffer nil)
 
+(autoload 'gnus-make-hashtable "gnus-util")
+(autoload 'widget-button-press "wid-edit" nil t)
+(declare-function widget-event-point "wid-edit" (event))
+;; If gnus-buffer-configuration is bound this is loaded.
+(declare-function gnus-configure-windows "gnus-win" (setting &optional force))
+
 (defun mml-preview (&optional raw)
   "Display current buffer with Gnus, in a new buffer.
 If RAW, display a raw encoded MIME message.