[svn:dbi] r14467 - dbi/trunk/t

[email protected] Thu, 7 Oct 2010 23:38:31 -0700 (PDT)
Newsgroups perl.dbi.changes
Message-ID <[email protected]>
Author: hmbrand
Date: Thu Oct  7 23:38:31 2010
New Revision: 14467

Modified:
   dbi/trunk/t/40profile.t

Log:
fixed badly placed paren

Modified: dbi/trunk/t/40profile.t
==============================================================================
--- dbi/trunk/t/40profile.t	(original)
+++ dbi/trunk/t/40profile.t	Thu Oct  7 23:38:31 2010
@@ -95,7 +95,7 @@
 $dbh = DBI->connect("dbi:ExampleP:", '', '', { RaiseError=>1, Profile=>6 });
 is_deeply $dbh->{Profile}{Path}, [ '!Statement', '!MethodName' ];
 cmp_ok(keys %{ $dbh->{Profile}{Data} },     '==', 1, 'on at connect, 1 key');
-cmp_ok(keys %{ $dbh->{Profile}{Data}{""} }, '>=', 1), 'on at connect, 1 key'; # at least STORE
+cmp_ok(keys %{ $dbh->{Profile}{Data}{""} }, '>=', 1, 'on at connect, 1 key'); # at least STORE
 ok(ref $dbh->{Profile}{Data}{""}{STORE}, 'STORE is ref');
 
 print "dbi_profile\n";