GitHub/pbot
3
0
Fork 0
mirror of https://github.com/pragma-/pbot.git synced 2024-12-24 11:42:35 +01:00
Code Issues Projects Releases Wiki Activity

Add "forever" as valid parsedate option

Browse Source 
`ban` command will not save ban to unban-timeouts if "forever" is used.
This commit is contained in:
Pragmatic Software 2015-05-06 21:13:39 -07:00
parent 3be6755a61
commit b5c10b73d9
3 changed files with 16 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
PBot/ChanOpCommands.pm
View File

@ -65,10 +65,16 @@ sub ban_user {
}
my $botnick = $self->{pbot}->{registry}->get_value('irc', 'botnick');
return "" if $target =~ /\Q$botnick\E/i;
return "I don't think so." if $target =~ /^\Q$botnick\E!/i;
$self->{pbot}->{chanops}->ban_user_timed($target, $channel, $length);
if ($length > 0) {
$length = duration($length);
} else {
$length = 'all eternity';
}
return "/msg $nick $target banned in $channel for $length";
}

4
PBot/ChanOps.pm
View File

@ -116,11 +116,13 @@ sub ban_user_timed {
my $self = shift;
my ($mask, $channel, $length) = @_;
$mask .= '!*@*' if $mask !~ m/[!@]/;
$mask .= '!*@*' if $mask !~ m/[\$!@]/;
$self->ban_user($mask, $channel);
if ($length > 0) {
$self->{unban_timeout}->hash->{$channel}->{$mask}{timeout} = gettimeofday + $length;
$self->{unban_timeout}->save;
}
}
sub join_channel {
my ($self, $channel) = @_;

4
PBot/Utils/ParseDate.pm
View File

@ -20,7 +20,9 @@ sub parsedate {
my $seconds = 0;
foreach my $input (@inputs) {
return -1 if $input =~ m/forever/i;
$input .= ' seconds' if $input =~ m/^\d+$/;
my $parse = Time::ParseDate::parsedate($input, NOW => $now);
if (not defined $parse) {
@ -30,7 +32,7 @@ sub parsedate {
}
}
return ($seconds, undef);
return $seconds;
}
1;