Fix test warning
Peter Rabbitson [Mon, 3 May 2010 22:50:35 +0000 (22:50 +0000)]
t/storage/dbi_env.t

index f5275c3..5ef4274 100644 (file)
@@ -70,7 +70,7 @@ $schema = DBICTest::Schema->connect("dbi::$dbname");
 lives_ok { count_sheep($schema) } 'SQLite in DBI_DRIVER';
 isa_ok $schema->storage, 'DBIx::Class::Storage::DBI::SQLite';
 
-undef $ENV{DBI_DRIVER};
+delete $ENV{DBI_DRIVER};
 $ENV{DBI_DSN} = "dbi:SQLite:$dbname";
 $schema = DBICTest::Schema->connect;
 lives_ok { count_sheep($schema) } 'SQLite in DBI_DSN';