From: Tara L Andrews <tla\@mit.edu>
Date: Mon, 16 Jan 2012 14:55:34 +0000 (+0100)
Subject: remember to rank lacunae too
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=bc680ef2462c7df62fbfeb8c526156a432c8ff72;p=scpubgit%2Fstemmatology.git

remember to rank lacunae too
---

diff --git a/lib/Text/Tradition/Parser/Tabular.pm b/lib/Text/Tradition/Parser/Tabular.pm
index b70285f..22e3aea 100644
--- a/lib/Text/Tradition/Parser/Tabular.pm
+++ b/lib/Text/Tradition/Parser/Tabular.pm
@@ -146,7 +146,6 @@ sub parse {
         my $last_rdg = shift @$p;
         my $new_p = [ $last_rdg ];
         foreach my $rdg ( @$p ) {
-        	$DB::single = 1 if $rdg->id eq '228,1';
             if( $rdg->text eq '#LACUNA#' ) {
                 # If we are in a lacuna already, drop this node.
                 # Otherwise make a lacuna node and drop this node.
@@ -159,6 +158,7 @@ sub parse {
                     	$l = $c->add_reading( {
 							'id' => $l_id,
 							'is_lacuna' => 1,
+							'rank' => $rdg->rank,
 							} );
 					}
                     push( @$new_p, $l );