diff --git a/lib/commands/parser.pm b/lib/commands/parser.pm index aa0759503be47dd6122d49caa0ffa61e6fb60fd4..e57318d55af04762a52826b8313276111e6e3412 100644 --- a/lib/commands/parser.pm +++ b/lib/commands/parser.pm @@ -52,7 +52,7 @@ sub exec { $irc->yield(privmsg => $chan->[0] => $insultes[rand @insultes]); } } - elsif ($msg =~ /^ *!later(?: (\S+))?(?: in (\d)+(h|m|s)?)? *$/) { + elsif ($msg =~ /^ *!later(?: (\S+))?(?: in (\d+)(h|m|s)?)? *$/) { my $index = $1; my ($time, $unit) = ($2, $3);