Fix to avoid bark in File::Spec.

svn path=/bioperl-run/branches/branch-07/; revision=12984
bioperl · Aug 25, 2001 · 5959480 · 5959480
1 parent af51c8d
commit 5959480
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Bio/Tools/Run/StandAloneBlast.pm b/Bio/Tools/Run/StandAloneBlast.pm
@@ -284,7 +284,7 @@ BEGIN {
 # If local BLAST databases are not stored in the standard
 # /data directory, the variable BLASTDATADIR will need to be set explicitly 
      $DATADIR =  $ENV{'BLASTDATADIR'} ||
-	 ($BLASTDIR ? Bio::Root::IO->catfile($BLASTDIR,'data') : undef);
+	 ($BLASTDIR ? Bio::Root::IO->catfile($BLASTDIR,'data') : '');
 }
 
 @ISA = qw(Bio::Root::RootI Bio::Root::IO);