handle windows exes

svn path=/bioperl-run/trunk/; revision=13168
bioperl · Jul 29, 2002 · 448afd4 · 448afd4
1 parent cac1d82
commit 448afd4
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Bio/Tools/Run/Phylo/PAML/Yn00.pm b/Bio/Tools/Run/Phylo/PAML/Yn00.pm
@@ -109,7 +109,7 @@ documentation of the default values.
 BEGIN { 
 
     $MINNAMELEN = 25;
-    $PROGRAMNAME = 'yn00';
+    $PROGRAMNAME = 'yn00'  . ($^O =~ /mswin/i ?'.exe':'');
     if( defined $ENV{'PAMLDIR'} ) {
 	$PROGRAM = Bio::Root::IO->catdir($ENV{'PAMLDIR'},$PROGRAMNAME);
     }