Optional parameter for nnagent-server-opened.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f2b778f..82a7390 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+1999-12-19 22:49:13  Shenghuo ZHU  <zsh@cs.rochester.edu>
+
+       * nnagent.el (nnagent-server-opened): Optional.
+       (nnagent-status-message): Optional.
+
 1999-12-19  Simon Josefsson  <jas@pdc.kth.se>
 
        * gnus-cite.el (gnus-article-toggle-cited-text): Restore beg and

diff --git a/lisp/nnagent.el b/lisp/nnagent.el
index 0548547..d551c9e 100644 (file)
--- a/lisp/nnagent.el
+++ b/lisp/nnagent.el
@@ -184,11 +184,11 @@
   (nnoo-parent-function 'nnagent 'nnml-set-status 
                    (list article name value group (nnagent-server server))))
 
-(deffoo nnagent-server-opened (server)
+(deffoo nnagent-server-opened (&optional server)
   (nnoo-parent-function 'nnagent 'nnml-server-opened
                        (list (nnagent-server server))))
 
-(deffoo nnagent-status-message (server)
+(deffoo nnagent-status-message (&optional server)
   (nnoo-parent-function 'nnagent 'nnml-status-message
                        (list (nnagent-server server))))