Fix graphml output / input format

[scpubgit/stemmatology.git] / make_tradition.pl

diff --git a/make_tradition.pl b/make_tradition.pl
old mode 100644 (file)
new mode 100755 (executable)
index 6828e71..22b50df
--- a/make_tradition.pl
+++ b/make_tradition.pl
@@ -81,7 +81,7 @@ if( $HACK ) {
 if( $outformat eq 'stemma' ) {
     my $stemma = Text::Tradition::Stemma->new( 
         'collation' => $tradition->collation );
-    my( $result, $tree ) = $stemma->run_pars();
+    my( $result, $tree ) = $stemma->run_phylip_pars();
     if( $result ) {
         print $tree;
     } else {