fix return value mod in distance_trees

[scpubgit/stemmatology.git] / lib / Text / Tradition / StemmaUtil.pm

diff --git a/lib/Text/Tradition/StemmaUtil.pm b/lib/Text/Tradition/StemmaUtil.pm
index 0158d61..15e7f89 100644 (file)
--- a/lib/Text/Tradition/StemmaUtil.pm
+++ b/lib/Text/Tradition/StemmaUtil.pm
@@ -146,6 +146,7 @@ sub phylip_pars {
     }
     return join( '', @outtree ) if @outtree;
 
+       # If we got this far, we are about to throw an error.
     my @error;
     if( -f "$phylip_dir/outfile" ) {
         open( OUTPUT, "$phylip_dir/outfile" ) or die "Could not open output for read";