develooper Front page | perl.perl5.porters | Postings from December 2001

[FOLLOWUP PATCH] (\X and \C fixed, \X still dorked)

From:
Jeffrey Friedl
Date:
December 21, 2001 23:32
Subject:
[FOLLOWUP PATCH] (\X and \C fixed, \X still dorked)
Message ID:
200112220732.fBM7WUc26013@ventrue.corp.yahoo.com

Too much concentration on the tests, and not enough on the patch.
We're back to:
   CONSECUTIVE DAYS WITHOUT A WORKPLACE INJURY:  0

Jeffrey



--- t/op/regexp.t.old	Fri Dec 21 23:27:41 2001
+++ t/op/regexp.t	Fri Dec 21 23:27:55 2001
@@ -47,7 +47,6 @@
 open(TESTS,'op/re_tests') || open(TESTS,'t/op/re_tests') || open(TESTS,':op:re_tests') ||
 	die "Can't open re_tests";
 
-my @TESTS;
 while (<TESTS>) { }
 $numtests = $.;
 seek(TESTS,0,0);
@@ -136,7 +135,7 @@
 	    }
 	}
     }
-#    print "ok $.\n";
+    print "ok $.\n";
 }
 
 close(TESTS);



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About