(declare-function): Add compatibility definition.

(password-read-and-add): Declare as a function.

1 files changed, 4 insertions, 0 deletions

diff --git a/lisp/gnus/smime.el b/lisp/gnus/smime.el
index 31545c1604..bd9ce5a5c4 100644
--- a/lisp/gnus/smime.el
+++ b/lisp/gnus/smime.el
@@ -121,6 +121,9 @@
 
 ;;; Code:
 
+;; For Emacs < 22.2.
+(eval-and-compile
+  (unless (fboundp 'declare-function) (defmacro declare-function (&rest r))))
 (require 'dig)
 (or (require 'password-cache nil t)
     (require 'password))
@@ -257,6 +260,7 @@ must be set in `ldap-host-parameters-alist'."
 	   temporary-file-directory))))))
 
 ;; Password dialog function
+(declare-function password-read-and-add "password-cache" (prompt &optional key))
 
 (defun smime-ask-passphrase (&optional cache-key)
   "Asks the passphrase to unlock the secret key.