[svn:DBD-Pg] r14528 - in DBD-Pg/trunk: . t

Author: theory
Date: Wed Nov 17 13:47:34 2010
New Revision: 14528

Modified:
   DBD-Pg/trunk/Changes
   DBD-Pg/trunk/t/04misc.t

Log:
Fix failing test on Perl 5.12. [Eric Simon]

Modified: DBD-Pg/trunk/Changes
==============================================================================
--- DBD-Pg/trunk/Changes	(original)
+++ DBD-Pg/trunk/Changes	Wed Nov 17 13:47:34 2010
@@ -4,6 +4,7 @@
 
   - Support dequoting of hex bytea format for 9.0.
     [Dagfinn Ilmari Mannsåker] (CPAN bug #60200).
+  - Fix failing test in t/04misc.t on Perl 5.12. [Eric Simon]
 
 2.17.1 Released April 8, 2010
 

Modified: DBD-Pg/trunk/t/04misc.t
==============================================================================
--- DBD-Pg/trunk/t/04misc.t	(original)
+++ DBD-Pg/trunk/t/04misc.t	Wed Nov 17 13:47:34 2010
@@ -284,7 +284,7 @@
 
 $t='The "data_sources" method returns undef when fed a bogus second argument';
 @result = DBI->data_sources('Pg','foobar');
-is_deeply (@result, undef, $t);
+is (scalar @result, 0, $t);
 
 $t='The "data_sources" method returns information when fed a valid port as the second arg';
 my $port = $dbh->{pg_port};