(gnus-score-after-write-file-function): Fix :type.

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 3bf886c5e7da8392390a18bd50f0ef27dda205b8..10aa8793620e776eaab5873fd04df6ed7cd21f4a 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,8 @@
+2001-02-08  Dave Love  <fx@gnu.org>
+
+       * gnus-sum.el (gnus-alter-articles-to-read-function): Fix :type.
+       * gnus-score.el (gnus-score-after-write-file-function): 
+
 2001-02-07  ShengHuo ZHU  <zsh@cs.rochester.edu>
 
        * message.el (message-make-forward-subject): Argument decoded.

diff --git a/lisp/gnus/gnus-score.el b/lisp/gnus/gnus-score.el
index 213178320abbc39b16473b35d03a6665e000ae7a..0cfc079a214e5376addfb0d1a20310a8b1e565bd 100644 (file)
--- a/lisp/gnus/gnus-score.el
+++ b/lisp/gnus/gnus-score.el
@@ -384,7 +384,7 @@ If nil, the user will be asked for a duration."
 (defcustom gnus-score-after-write-file-function nil
   "Function called with the name of the score file just written to disk."
   :group 'gnus-score-files
-  :type 'function)
+  :type '(choice (const nil) function))
 
 (defcustom gnus-score-thread-simplify nil
   "If non-nil, subjects will simplified as in threading."