From: Tara L Andrews <tla@mit.edu>
Date: Tue, 4 Sep 2012 15:15:30 +0000 (+0200)
Subject: remove unused code lines
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=db61303b93ba08ca97778858ee56ad31747dc308;p=scpubgit%2Fstemmatology.git

remove unused code lines
---

diff --git a/lib/Text/Tradition/Collation.pm b/lib/Text/Tradition/Collation.pm
index d9b8e12..022c2bc 100644
--- a/lib/Text/Tradition/Collation.pm
+++ b/lib/Text/Tradition/Collation.pm
@@ -1281,8 +1281,6 @@ sub _make_witness_row {
     map { $char_hash{$_} = undef } @$positions;
     my $debug = 0;
     foreach my $rdg ( @$path ) {
-        my $rtext = $rdg->text;
-        $rtext = '#LACUNA#' if $rdg->is_lacuna;
         say STDERR "rank " . $rdg->rank if $debug;
         # say STDERR "No rank for " . $rdg->id unless defined $rdg->rank;
         $char_hash{$rdg->rank} = { 't' => $rdg };