X-Git-Url: http://git.ieval.ro/?p=poe-component-irc-plugin-seen.git;a=blobdiff_plain;f=t%2FPOE-Component-IRC-Plugin-Seen.t;fp=t%2FPOE-Component-IRC-Plugin-Seen.t;h=5d97e322c619ed51797a20f955d9e5573d998bb1;hp=0a0d925ea9852c464d295c7b548098993ec1cba1;hb=f45fe0cecd97296203d40a8bd2bce5c878eaf94f;hpb=d37b05fccb4dbb5ed2ee6c5e08bc8d26dc299477 diff --git a/t/POE-Component-IRC-Plugin-Seen.t b/t/POE-Component-IRC-Plugin-Seen.t index 0a0d925..5d97e32 100644 --- a/t/POE-Component-IRC-Plugin-Seen.t +++ b/t/POE-Component-IRC-Plugin-Seen.t @@ -21,10 +21,10 @@ my $rmgv = \'mgv!marius@ieval.ro'; # Sub setup sub runtest{ - my ($message, $expect, $comment) = @_; - undef $last_msg; - $self->S_public($mockirc, $rmgv, \$channels, \$message); - is($last_msg, $expect, $comment) + my ($message, $expect, $comment) = @_; + undef $last_msg; + $self->S_public($mockirc, $rmgv, \$channels, \$message); + is($last_msg, $expect, $comment) } runtest 'something', undef, 'initialize';