Added test that breaks the dumper

[dbsrgits/DBM-Deep.git] / t / 01_basic.t

diff --git a/t/01_basic.t b/t/01_basic.t
index 8c9c430..7025ea9 100644 (file)
--- a/t/01_basic.t
+++ b/t/01_basic.t
@@ -25,16 +25,3 @@ if ( $@ ) {
 
 isa_ok( $db, 'DBM::Deep' );
 ok(1, "We can successfully open a file!" );
-__END__
-$db->{foo} = [ 1 ];
-$db->{bar} = $db->{foo};
-
-warn -s $filename, $/;
-warn $db->_dump_file;
-
-warn $/;
-
-delete $db->{foo};
-$db->{bar} = 'x';
-warn -s $filename, $/;
-warn $db->_dump_file;