Synch to No Gnus 200411282151.

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

diff --git a/lisp/encrypt.el b/lisp/encrypt.el
index 8393823..61c21a6 100644 (file)
--- a/lisp/encrypt.el
+++ b/lisp/encrypt.el
@@ -32,7 +32,12 @@
 
 ;; autoload password
 (eval-and-compile
-  (autoload 'password-read "password"))
+  (autoload 'password-read "password")
+  ;; 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")
+  (defvar password-cache-expiry))
 
 (defgroup encrypt nil
   "File encryption configuration.")
@@ -94,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)
@@ -103,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: ")
@@ -274,5 +281,3 @@ Format example:
 
 (provide 'encrypt)
 ;;; encrypt.el ends here
-
-;; arch-tag: d907e4f1-71b5-42b1-a180-fc7b84ff0648