X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=scpubgit%2Fstemmatology.git;a=blobdiff_plain;f=lib%2FText%2FTradition%2FCollation%2FReading.pm;fp=lib%2FText%2FTradition%2FCollation%2FReading.pm;h=f445420829ba97d6230bc5d2d1f958cc2530ea8a;hp=4a022b58aeee78e5e6639bf74304c6a980ed537f;hb=339786dd0b0c493786af4df1ec3bc7ef2bf497e2;hpb=9bdf9d67ee6007981f4cc59e844f02de4df7a289

diff --git a/lib/Text/Tradition/Collation/Reading.pm b/lib/Text/Tradition/Collation/Reading.pm
index 4a022b5..f445420 100644
--- a/lib/Text/Tradition/Collation/Reading.pm
+++ b/lib/Text/Tradition/Collation/Reading.pm
@@ -183,12 +183,14 @@ has 'join_prior' => (
 	is => 'ro',
 	isa => 'Bool',
 	default => undef,
+	writer => '_set_join_prior',
 	);
 	
 has 'join_next' => (
 	is => 'ro',
 	isa => 'Bool',
 	default => undef,
+	writer => '_set_join_next',
 	);