[Bps-public-commit] smokingit branch, master, updated. 558a9af7f7352edea9c461a6e3e42cb7f28547fd
Alex Vandiver
alexmv at bestpractical.com
Mon Jan 6 23:07:18 EST 2014
The branch, master has been updated
via 558a9af7f7352edea9c461a6e3e42cb7f28547fd (commit)
from 123c687481134c6383da7077f2f77a5ebdd07671 (commit)
Summary of changes:
lib/Smokingit/IRC.pm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
- Log -----------------------------------------------------------------
commit 558a9af7f7352edea9c461a6e3e42cb7f28547fd
Author: Alex Vandiver <alexmv at bestpractical.com>
Date: Mon Jan 6 23:07:15 2014 -0500
Use a non-capturing group
diff --git a/lib/Smokingit/IRC.pm b/lib/Smokingit/IRC.pm
index 5e39829..5f24ed5 100644
--- a/lib/Smokingit/IRC.pm
+++ b/lib/Smokingit/IRC.pm
@@ -74,7 +74,7 @@ sub incoming {
return if $incoming->isa("IM::Engine::Incoming::IRC::Channel")
and not $msg =~ s/^\s*$nick(?:\s*[:,])?\s*(?:please\s+)?//i;
- if ($msg =~ /^(re)?test\s+(.*)/) {
+ if ($msg =~ /^(?:re)?test\s+(.*)/) {
return $self->do_test($incoming, $1);
} elsif ($msg =~ /^status\s+(?:of\s+)?(.*)/) {
return $self->do_status($incoming, $1);
-----------------------------------------------------------------------
More information about the Bps-public-commit
mailing list