* riece-server.el (riece-server-keyword-map): Add :protocol.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index dbbc5bf..489bc86 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2004-07-18  Daiki Ueno  <ueno@unixuser.org>
 
 2004-07-18  Daiki Ueno  <ueno@unixuser.org>
 

+       * riece-server.el (riece-server-keyword-map): Add :protocol.
+

        * riece-handle.el (riece-300): Require 'riece-000, 'riece-200,
        'riece-300, 'riece-400, and 'riece-500.
        (riece-default-handle-numeric-reply): Moved from riece-filter.el.
        * riece-handle.el (riece-300): Require 'riece-000, 'riece-200,
        'riece-300, 'riece-400, and 'riece-500.
        (riece-default-handle-numeric-reply): Moved from riece-filter.el.

diff --git a/lisp/riece-server.el b/lisp/riece-server.el
index 6b7e1e6..d7badb8 100644 (file)
--- a/lisp/riece-server.el
+++ b/lisp/riece-server.el
@@ -38,7 +38,8 @@
       (:username riece-username)
       (:password)
       (:function riece-default-open-connection-function)
       (:username riece-username)
       (:password)
       (:function riece-default-open-connection-function)

-      (:coding riece-default-coding-system))
+      (:coding riece-default-coding-system)
+      (:protocol))

     "Mapping from keywords to default values.
 All keywords that can be used must be listed here."))
 
     "Mapping from keywords to default values.
 All keywords that can be used must be listed here."))