(riece-server-alist): Accept an integer for
authorueno <ueno>
Fri, 6 Jun 2008 20:14:42 +0000 (20:14 +0000)
committerueno <ueno>
Fri, 6 Jun 2008 20:14:42 +0000 (20:14 +0000)
:service.

lisp/ChangeLog
lisp/riece-options.el

index 6053dfd..e2d074c 100644 (file)
@@ -1,3 +1,8 @@
+2008-06-07  Daiki Ueno  <ueno@unixuser.org>
+
+       * riece-options.el (riece-server-alist): Accept an integer for
+       :service.
+
 2008-06-06  Daiki Ueno  <ueno@unixuser.org>
 
        * riece-compat.el (riece-make-local-hook): New alias.
index 0d761c5..69d22ca 100644 (file)
@@ -182,6 +182,7 @@ specifying the coding systems for decoding and encoding respectively."
                                 :format "%{%t%}: %v"
                                 (const :tag "" :value :service)
                                 (choice (const :tag "Default" 6667)
+                                        integer
                                         string))
                           (list :inline t :tag "Nickname"
                                 :format "%{%t%}: %v"