2005-03-08 Juergen Kreileder <jk@blackdown.de> (tiny change)

[gnus] / lisp / encrypt.el

diff --git a/lisp/encrypt.el b/lisp/encrypt.el
index 8fca281..0e14ca9 100644 (file)
--- a/lisp/encrypt.el
+++ b/lisp/encrypt.el
@@ -1,5 +1,5 @@
 ;;; encrypt.el --- file encryption routines
-;; Copyright (C) 2002, 2003, 2004 Free Software Foundation, Inc.
+;; Copyright (C) 2002, 2003, 2004, 2005 Free Software Foundation, Inc.
 
 ;; Author: Teodor Zlatanov <tzz@lifelogs.com>
 ;; Created: 2003/01/24
@@ -34,18 +34,10 @@
 (eval-and-compile
   (autoload 'password-read "password"))
 
-(defgroup encrypt nil
+(defgroup encrypt '((password-cache custom-variable)
+                   (password-cache-expiry custom-variable))
   "File encryption configuration.")
 
-(defcustom encrypt-password-cache-expiry 200
-  "Encryption password timeout.
-When set, directly sets password-cache-expiry"
-  :type 'integer
-  :group 'encrypt
-  :set (lambda (symbol value)
-        (set symbol value)
-        (setq password-cache-expiry value)))
-
 (defcustom encrypt-file-alist nil
   "List of file names or regexes matched with encryptions.
 Format example: