--- trunk/t/002_isis.t 2005/01/05 15:46:26 32 +++ trunk/t/002_isis.t 2005/01/05 21:23:04 33 @@ -9,6 +9,7 @@ BEGIN { use_ok( 'IsisDB' ); } +my $debug = shift @ARGV; my $isis; sub test_data { @@ -124,6 +125,7 @@ $isis = IsisDB->new ( isisdb => './data/winisis/BIBL', include_deleted => 1, + debug => $debug, ); print Dumper($isis); @@ -166,6 +168,7 @@ $isis = IsisDB->new ( isisdb => './data/winisis/BIBL', + debug => $debug, ); ok(! $isis->fetch(3), "deleted not found");