# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1197350812 0
# Node ID 8cbce6c6b6c054eae95c20519b7a7059a99e3796
# Parent  1efb9854eedf651a7b617a4af31134882c3e2016
Add declare-function compatibility definition.
(epg-check-configuration, epg-configuration)
(message-options-set): Declare as functions.
(gnus-buffer-live-p, gnus-get-buffer-create): Autoload.

diff -r 1efb9854eedf -r 8cbce6c6b6c0 lisp/gnus/mml2015.el
--- a/lisp/gnus/mml2015.el	Tue Dec 11 05:25:51 2007 +0000
+++ b/lisp/gnus/mml2015.el	Tue Dec 11 05:26:52 2007 +0000
@@ -30,6 +30,10 @@
 
 ;;; Code:
 
+;; For Emacs < 22.2.
+(eval-and-compile
+  (unless (fboundp 'declare-function) (defmacro declare-function (&rest r))))
+
 (eval-when-compile (require 'cl))
 (require 'mm-decode)
 (require 'mm-util)
@@ -38,6 +42,10 @@
 
 (defvar mc-pgp-always-sign)
 
+(declare-function epg-check-configuration "ext:epg-config"
+                  (config &optional minimum-version))
+(declare-function epg-configuration "ext:epg-config" ())
+
 (defvar mml2015-use (or
 		     (condition-case nil
 			 (progn
@@ -396,6 +404,10 @@
     (insert (format "--%s--\n" boundary))
     (goto-char (point-max))))
 
+;; We require mm-decode, which requires mm-bodies, which autoloads
+;; message-options-get (!).
+(declare-function message-options-set "message" (symbol value))
+
 (defun mml2015-mailcrypt-encrypt (cont &optional sign)
   (let ((mc-pgp-always-sign
 	 (or mc-pgp-always-sign
@@ -1329,6 +1341,9 @@
 
 ;;; General wrapper
 
+(autoload 'gnus-buffer-live-p "gnus-util")
+(autoload 'gnus-get-buffer-create "gnus")
+
 (defun mml2015-clean-buffer ()
   (if (gnus-buffer-live-p mml2015-result-buffer)
       (with-current-buffer mml2015-result-buffer