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

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',
 	);