X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fstemma.t;h=697d0d2c46b1070c0caf1c74fd9cb7afdddcde38;hb=7f52eac8cd00b160ea9e828790cbd093dc444feb;hp=45f1f3f9c6d8179aaa6f36331deb1e69b1037bed;hpb=9317e522bb0299ab6bdcfe2d999750719e893407;p=scpubgit%2Fstemmatology.git diff --git a/t/stemma.t b/t/stemma.t index 45f1f3f..697d0d2 100644 --- a/t/stemma.t +++ b/t/stemma.t @@ -30,7 +30,7 @@ ok( $stemma->isa( 'Text::Tradition::Stemma' ), 'Got the right sort of object' ); is( $stemma->graph, '1-2,1-A,2-B,2-C', "Got the correct graph" ); # Test for character matrix creation -my $mstr = character_input( $c->make_alignment_table() ); +my $mstr = character_input( $c->alignment_table() ); ## check number of rows my @mlines = split( "\n", $mstr ); my $msig = shift @mlines;