Document and test non-reference { -in => ... }

[scpubgit/Q-Branch.git] / t / 03values.t

diff --git a/t/03values.t b/t/03values.t
old mode 100755 (executable)
new mode 100644 (file)
index c0ec9cc..b3ab252
--- a/t/03values.t
+++ b/t/03values.t
@@ -55,9 +55,6 @@ my @data = (
     },
 );
 
-
-plan tests => (@data * 5  +  2);
-
 # test insert() and values() for reentrancy
 my($insert_hash, $insert_array, $numfields);
 my $a_sql = SQL::Abstract->new;
@@ -119,3 +116,5 @@ for my $record (@data) {
     'values() output matches that of initial bind'
   ) || diag "Corresponding SQL statement: $stmt";
 }
+
+done_testing;