Permalink
Browse files

Hardening test

  • Loading branch information...
1 parent 0d9efc0 commit 127720b7fe8beb3edd755aae464ced46bedcf241 @fangly fangly committed Nov 1, 2012
Showing with 4 additions and 0 deletions.
  1. +4 −0 t/LocalDB/Fasta.t
View
@@ -148,8 +148,12 @@ my $test_files = [
# Concurrent databases (bug #3390)
ok my $db1 = Bio::DB::Fasta->new( test_input_file('dbfa', '1.fa') );
ok my $db2 = Bio::DB::Fasta->new( test_input_file('dbfa', '2.fa') );
+ ok my $db3 = Bio::DB::Fasta->new( $test_dir );
is $db1->file('AW057231'), '1.fa';
is $db2->file('AW057302'), '2.fa';
+ is $db3->file('AW057231'), '1.fa';
+ is $db3->file('AW057119'), '1.fa';
+ is $db3->file('AW057410'), '3.fa';
}

0 comments on commit 127720b

Please sign in to comment.