fix morphology lookup sub name

[scpubgit/stemmatology.git] / t / text_tradition_parser_tei.t

diff --git a/t/text_tradition_parser_tei.t b/t/text_tradition_parser_tei.t
index 38c5e0e..2fb33a8 100644 (file)
--- a/t/text_tradition_parser_tei.t
+++ b/t/text_tradition_parser_tei.t
@@ -22,8 +22,8 @@ my $t = Text::Tradition->new(
 
 is( ref( $t ), 'Text::Tradition', "Parsed parallel-segmentation TEI" );
 if( $t ) {
-    is( scalar $t->collation->readings, 319, "Collation has all readings" );
-    is( scalar $t->collation->paths, 2854, "Collation has all paths" );
+    is( scalar $t->collation->readings, 311, "Collation has all readings" );
+    is( scalar $t->collation->paths, 361, "Collation has all paths" );
 }
 }