<div dir="ltr">Committed as r238. Thanks!<div><br></div><div style>Bye,</div><div style><br></div><div style>Erik.</div></div><div class="gmail_extra"><br><br><div class="gmail_quote">On Sun, Jan 13, 2013 at 3:04 PM, Julien Danjou <span dir="ltr"><<a href="mailto:julien@danjou.info" target="_blank">julien@danjou.info</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">If you just want to retrieve the mode of a channel, you don't have to pass a<br>
mode argument at all, and you'll get a RPL_CHANNELMODEIS in return.<br>
<br>
Signed-off-by: Julien Danjou <<a href="mailto:julien@danjou.info">julien@danjou.info</a>><br>
---<br>
 command.lisp | 4 ++--<br>
 1 file changed, 2 insertions(+), 2 deletions(-)<br>
<br>
diff --git a/command.lisp b/command.lisp<br>
index aac445b..c167561 100644<br>
--- a/command.lisp<br>
+++ b/command.lisp<br>
@@ -9,7 +9,7 @@<br>
 (defgeneric nick (connection new-nickname))<br>
 (defgeneric user- (connection username mode &optional realname))<br>
 (defgeneric oper (connection name password))<br>
-(defgeneric mode (connection nickname mode))<br>
+(defgeneric mode (connection nickname &optional mode))<br>
 (defgeneric op (connection channel nickname))<br>
 (defgeneric deop (connection channel nickname))<br>
 (defgeneric voice (connection channel user))<br>
@@ -103,7 +103,7 @@ registered."<br>
 (defmethod oper ((connection connection) (name string) (password string))<br>
   (send-irc-message connection :oper name password))<br>
<br>
-(defmethod mode ((connection connection) (nickname string) (mode string))<br>
+(defmethod mode ((connection connection) (nickname string) &optional mode)<br>
   (send-irc-message connection :mode nickname mode))<br>
<br>
 ;; utility functions not part of the RFCs<br>
<span class="HOEnZb"><font color="#888888">--<br>
1.8.1<br>
<br>
<br>
_______________________________________________<br>
cl-irc-devel site list<br>
<a href="mailto:cl-irc-devel@common-lisp.net">cl-irc-devel@common-lisp.net</a><br>
<a href="http://common-lisp.net/mailman/listinfo/cl-irc-devel" target="_blank">http://common-lisp.net/mailman/listinfo/cl-irc-devel</a><br>
</font></span></blockquote></div><br></div>