Synch to No Gnus 200411282151.

[elisp/gnus.git-] / lisp / encrypt.el

diff --git a/lisp/encrypt.el b/lisp/encrypt.el
index 4f2e29f..61c21a6 100644 (file)
--- a/lisp/encrypt.el
+++ b/lisp/encrypt.el
@@ -33,10 +33,11 @@
 ;; autoload password
 (eval-and-compile
   (autoload 'password-read "password")
-  ;; Those two autoloads are needed since T-gnus won't load password.el
+  ;; The following section is needed since T-gnus won't load password.el
   ;; by way of pgg.el at the compile time.
   (autoload 'password-read-and-add "password")
-  (autoload 'password-cache-remove "password"))
+  (autoload 'password-cache-remove "password")
+  (defvar password-cache-expiry))
 
 (defgroup encrypt nil
   "File encryption configuration.")
@@ -98,6 +99,7 @@ Format example:
 (defvar encrypt-temp-prefix "encrypt"
   "Prefix for temporary filenames")
 
+;;;###autoload
 (defun encrypt-find-model (filename)
   "Given a filename, find a encrypt-file-alist entry"
   (dolist (entry encrypt-file-alist)
@@ -107,6 +109,7 @@ Format example:
                (string-match match filename))
        (return model)))))
 
+;;;###autoload
 (defun encrypt-insert-file-contents (file &optional model)
   "Decrypt FILE into the current buffer."
   (interactive "fFile to insert: ")