Login
Added test case for RT #50910. It appears that we already handle
authorJeffrey Ryan Thalhammer <jeff@imaginative-software.com>
Wed, 28 Oct 2009 17:02:39 +0000 (17:02 +0000)
committerJeffrey Ryan Thalhammer <jeff@imaginative-software.com>
Wed, 28 Oct 2009 17:02:39 +0000 (17:02 +0000)
this case properly, but I thought it would be good to add, just
to catch future regressions.

t/RegularExpressions/ProhibitCaptureWithoutTest.run

index 1cdc895..3b59d24 100644 (file)
@@ -298,6 +298,18 @@ while (m/(foo)/) {
     print $1, "\n";
 }
 
+#-----------------------------------------------------------------------------
+
+## Regex followed by "and do {...}" RT #50910
+## failures 0
+## cut
+
+m/^commit (.*)/xsm and do {
+     $commit = $1;
+     next;
+};
+
+
 ##############################################################################
 #      $URL$
 #     $Date$