[Bast-commits] r9734 - in SQL-Abstract/1.x/trunk: . t

ribasushi at dev.catalyst.perl.org ribasushi at dev.catalyst.perl.org
Wed Sep 22 10:01:59 GMT 2010


Author: ribasushi
Date: 2010-09-22 11:01:59 +0100 (Wed, 22 Sep 2010)
New Revision: 9734

Modified:
   SQL-Abstract/1.x/trunk/Changes
   SQL-Abstract/1.x/trunk/t/10test.t
Log:
Reenable the tester test - it's fast enough now

Modified: SQL-Abstract/1.x/trunk/Changes
===================================================================
--- SQL-Abstract/1.x/trunk/Changes	2010-09-22 10:00:37 UTC (rev 9733)
+++ SQL-Abstract/1.x/trunk/Changes	2010-09-22 10:01:59 UTC (rev 9734)
@@ -1,5 +1,8 @@
 Revision history for SQL::Abstract
 
+    - Switch the tokenizer to precompiled regexes (massive speedup)
+    - Rudimentary handling of quotes ( 'WHERE' vs WHERE )
+
 revision 1.68  2010-09-16
 ----------------------------
     - Document methods on Tree

Modified: SQL-Abstract/1.x/trunk/t/10test.t
===================================================================
--- SQL-Abstract/1.x/trunk/t/10test.t	2010-09-22 10:00:37 UTC (rev 9733)
+++ SQL-Abstract/1.x/trunk/t/10test.t	2010-09-22 10:01:59 UTC (rev 9734)
@@ -10,17 +10,6 @@
 $Data::Dumper::Terse = 1;
 $Data::Dumper::Sortkeys = 1;
 
-# equivalent to $Module::Install::AUTHOR
-my $author = (
-  ( not -d './inc' )
-    or
-  ( -e ($^O eq 'VMS' ? './inc/_author' : './inc/.author') )
-);
-
-if (not $author and not $ENV{SQLATEST_TESTER} and not $ENV{AUTOMATED_TESTING}) {
-  plan skip_all => 'Skipping resource intensive self-tests, use SQLATEST_TESTER=1 to run';
-}
-
 my @sql_tests = (
       # WHERE condition - equal
       {




More information about the Bast-commits mailing list