Basic conversion to POE::Component::IRC

[NDIRC.git] / Commands / Quotes.pm

diff --git a/Commands/Quotes.pm b/Commands/Quotes.pm
index c2625a8b12fa10491d93414bfa3c071a3d1080d2..3353eb6a112df54326dd6690d6aae155823d1fa6 100644 (file)
--- a/Commands/Quotes.pm
+++ b/Commands/Quotes.pm
@@ -92,7 +92,7 @@ sub findquote
        }
        if ($match){
                close $file;
-               $c->message("dcc send ".$c->nick, $file);
+               $c->command(dcc => $c->nick => SEND => $file);
        }else{
                $c->reply("No quotes matching <b>$pattern.</b>");
        }