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

[email protected]
Newsgroups perl.dbi.changes
Message-ID <[email protected]>
Author: REHSACK
Date: Thu Jul 15 07:27:53 2010
New Revision: 14246

Modified:
   dbi/trunk/t/50dbm_simple.t
   dbi/trunk/t/52dbm_complex.t

Log:
test with MLDBM::Serializer::JSON, too - if found


Modified: dbi/trunk/t/50dbm_simple.t
==============================================================================
--- dbi/trunk/t/50dbm_simple.t	(original)
+++ dbi/trunk/t/50dbm_simple.t	Thu Jul 15 07:27:53 2010
@@ -26,6 +26,7 @@
 	push @mldbm_types, qw(Data::Dumper Storable); # both in CORE
         push @mldbm_types, 'FreezeThaw'   if eval { require 'FreezeThaw.pm' };
         push @mldbm_types, 'YAML'         if eval { require MLDBM::Serializer::YAML; };
+        push @mldbm_types, 'JSON'         if eval { require MLDBM::Serializer::JSON; };
     }
 
     # Potential DBM modules in preference order (SDBM_File first)

Modified: dbi/trunk/t/52dbm_complex.t
==============================================================================
--- dbi/trunk/t/52dbm_complex.t	(original)
+++ dbi/trunk/t/52dbm_complex.t	Thu Jul 15 07:27:53 2010
@@ -28,6 +28,7 @@
         push @mldbm_types, qw(Data::Dumper Storable);                             # both in CORE
         push @mldbm_types, 'FreezeThaw' if eval { require 'FreezeThaw.pm' };
         push @mldbm_types, 'YAML' if eval { require MLDBM::Serializer::YAML; };
+        push @mldbm_types, 'JSON' if eval { require MLDBM::Serializer::JSON; };
     }
 
     # Potential DBM modules in preference order (SDBM_File first)
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.