From: Tara L Andrews <tla@mit.edu>
Date: Sun, 30 Nov 2014 15:48:37 +0000 (+0100)
Subject: try to fix test failure of #30
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a512d0e6b2ab520f8f757e92967498ee885dd8c4;p=scpubgit%2Fstemmatology.git

try to fix test failure of #30
---

diff --git a/base/lib/Text/Tradition/Collation.pm b/base/lib/Text/Tradition/Collation.pm
index 41cace4..84ed439 100644
--- a/base/lib/Text/Tradition/Collation.pm
+++ b/base/lib/Text/Tradition/Collation.pm
@@ -457,6 +457,8 @@ warnings_exist {
 	"Got expected relationship drop warning on parse";
 
 my $c = $t->collation;
+# Force the transitive propagation of all existing relationships.
+$c->relations->propagate_all_relationships();
 
 my %rdg_ids;
 map { $rdg_ids{$_} = 1 } $c->readings;
diff --git a/base/t/text_tradition_collation.t b/base/t/text_tradition_collation.t
index ff73da2..edced1b 100644
--- a/base/t/text_tradition_collation.t
+++ b/base/t/text_tradition_collation.t
@@ -77,6 +77,8 @@ warnings_exist {
 	"Got expected relationship drop warning on parse";
 
 my $c = $t->collation;
+# Force the transitive propagation of all existing relationships.
+$c->relations->propagate_all_relationships();
 
 my %rdg_ids;
 map { $rdg_ids{$_} = 1 } $c->readings;