use changed API for stemmadot specification

[scpubgit/stemmatology.git] / script / make_tradition.pl

diff --git a/script/make_tradition.pl b/script/make_tradition.pl
index 309033b..212edfc 100755 (executable)
--- a/script/make_tradition.pl
+++ b/script/make_tradition.pl
@@ -69,7 +69,7 @@ if( $informat eq 'CollateText' ) {
 }
 my $tradition = Text::Tradition->new( %args );
 if( $stemmafile ) {
-       my $stemma = $tradition->add_stemma( $stemmafile );
+       my $stemma = $tradition->add_stemma( dotfile => $stemmafile );
        print STDERR "Saved stemma at $stemmafile\n" if $stemma;
 }