From: Tara L Andrews <tla@mit.edu>
Date: Sun, 7 Dec 2014 20:26:44 +0000 (+0000)
Subject: fix typo in Collation.pm test
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=2e8187032da10dfcf513cb3c70907912aa9698f6;p=scpubgit%2Fstemmatology.git

fix typo in Collation.pm test
---

diff --git a/base/lib/Text/Tradition/Collation.pm b/base/lib/Text/Tradition/Collation.pm
index f3f2322..22814f2 100644
--- a/base/lib/Text/Tradition/Collation.pm
+++ b/base/lib/Text/Tradition/Collation.pm
@@ -542,14 +542,14 @@ WARNING: This operation cannot be undone.
 
 use Text::Tradition;
 
-my $t = Text::Tradition->new( input => 'CollateX', file => 't/data/CollateX-16.xml' );
+my $t = Text::Tradition->new( input => 'CollateX', file => 't/data/Collatex-16.xml' );
 my $c = $t->collation;
 my $n = scalar $c->readings;
 $c->compress_readings();
 is( scalar $c->readings, $n - 6, "Compressing readings seems to work" );
 
 # Now put in a join-word and make sure the thing still works.
-my $t2 = Text::Tradition->new( input => 'CollateX', file => 't/data/CollateX-16.xml' );
+my $t2 = Text::Tradition->new( input => 'CollateX', file => 't/data/Collatex-16.xml' );
 my $c2 = $t2->collation;
 # Split n21 ('unto') for testing purposes
 my $new_r = $c2->add_reading( { 'id' => 'n21p0', 'text' => 'un', 'join_next' => 1 } );
diff --git a/base/t/text_tradition_collation.t b/base/t/text_tradition_collation.t
index bdd329e..b5e3ed1 100644
--- a/base/t/text_tradition_collation.t
+++ b/base/t/text_tradition_collation.t
@@ -121,14 +121,14 @@ try {
 {
 use Text::Tradition;
 
-my $t = Text::Tradition->new( input => 'CollateX', file => 't/data/CollateX-16.xml' );
+my $t = Text::Tradition->new( input => 'CollateX', file => 't/data/Collatex-16.xml' );
 my $c = $t->collation;
 my $n = scalar $c->readings;
 $c->compress_readings();
 is( scalar $c->readings, $n - 6, "Compressing readings seems to work" );
 
 # Now put in a join-word and make sure the thing still works.
-my $t2 = Text::Tradition->new( input => 'CollateX', file => 't/data/CollateX-16.xml' );
+my $t2 = Text::Tradition->new( input => 'CollateX', file => 't/data/Collatex-16.xml' );
 my $c2 = $t2->collation;
 # Split n21 ('unto') for testing purposes
 my $new_r = $c2->add_reading( { 'id' => 'n21p0', 'text' => 'un', 'join_next' => 1 } );