From 3cd546a8177aaae14ae345cc6b5adbbb68958d80 Mon Sep 17 00:00:00 2001
From: Alexandre Morignot <erdnaxeli@cervoi.se>
Date: Tue, 2 Dec 2014 01:14:14 +0100
Subject: [PATCH] better regex mon cul
---
lib/commands/parser.pm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lib/commands/parser.pm b/lib/commands/parser.pm
index aa07595..e57318d 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);
--
GitLab