summaryrefslogtreecommitdiffstats
path: root/modules/actions.pl
diff options
context:
space:
mode:
Diffstat (limited to 'modules/actions.pl')
-rw-r--r--modules/actions.pl41
1 files changed, 14 insertions, 27 deletions
diff --git a/modules/actions.pl b/modules/actions.pl
index 7d6717d..386e51a 100644
--- a/modules/actions.pl
+++ b/modules/actions.pl
@@ -4,45 +4,32 @@ use warnings;
#package Actions;
sub Actions::ban {
- our ($conn, $event, $unmode, $chan, %dct, $id);
- o_send( $conn, "mode $chan +b *!*\@$event->{host}" );
- $unmode="mode $chan -b *!*\@$event->{host}";
+ my ($conn, $event, $chan) = @_;
+ $::oq->o_send( $conn, "mode $chan +b *!*\@$event->{host}" );
+ return "mode $chan -b *!*\@$event->{host}";
}
sub Actions::kban {
- our ($conn, $event, $unmode, $chan, %dct, $id);
- o_send($conn, "mode $chan +b *!*\@$event->{host}");
- o_send($conn, "kick $chan $event->{nick} :$dct{$id}{reason}");
- $unmode = "mode $chan -b *!*\@$event->{host}";
+ my ($conn, $event, $chan) = @_;
+ $::oq->o_send($conn, "mode $chan +b *!*\@$event->{host}");
+ $::oq->o_send($conn, "kick $chan $event->{nick} :Spamming");
+ return "mode $chan -b *!*\@$event->{host}";
}
sub Actions::kick {
- our ($conn, $event, $unmode, $chan, %dct, $id);
- o_send($conn, "kick $chan $event->{nick} :$dct{$id}{reason}");
+ my ($conn, $event, $chan) = @_;
+ $::oq->o_send($conn, "kick $chan $event->{nick} :Spamming");
+ return "";
}
sub Actions::none {
- return;
+ return "";
}
sub Actions::quiet {
- our ($conn, $event, $unmode, $chan, %dct, $id);
- o_send( $conn, "mode $chan +b %*!*\@$event->{host}" );
- $unmode = "mode $chan -b %*!*\@$event->{host}";
-}
-
-sub Actions::fmod_wiki {
- our ($conn, $event, $unmode, $chan, %dct, $id);
- o_send( $conn, "mode $chan -b *!*\@$event->{host}" );
- o_send( $conn, "mode $chan +b *!*\@$event->{host}!#wikimedia-ops" );
-}
-
-sub Actions::killsub {
- undef &Actions::ban;
- undef &Actions::kban;
- undef &Actions::kick;
- undef &Actions::none;
- undef &Actions::quiet;
+ my ($conn, $event, $chan) = @_;
+ $::oq->o_send( $conn, "mode $chan +b %*!*\@$event->{host}" );
+ return "mode $chan -b %*!*\@$event->{host}";
}
return 1;