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

lisp/gnus/ChangeLog

+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.

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."