<div dir="ltr">Hi Julien,<div><br></div><div>Thanks. Committed as r237.</div><div><br></div><div>Bye,</div><div><br></div><div>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">The mode needs to be added on the channel, not the the target.<br>
<br>
Signed-off-by: Julien Danjou <<a href="mailto:julien@danjou.info">julien@danjou.info</a>><br>
---<br>
 event.lisp | 2 +-<br>
 1 file changed, 1 insertion(+), 1 deletion(-)<br>
<br>
diff --git a/event.lisp b/event.lisp<br>
index eb97fc9..5e6e417 100644<br>
--- a/event.lisp<br>
+++ b/event.lisp<br>
@@ -289,7 +289,7 @@ objects in sync."))<br>
             (op mode-name value)<br>
             change<br>
           (unless (has-mode-p channel mode-name)<br>
-            (add-mode target mode-name<br>
+            (add-mode channel mode-name<br>
                       (make-mode connection channel mode-name)))<br>
           (funcall (if (char= #\+ op) #'set-mode #'unset-mode)<br>
                    channel mode-name value)))))))<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>