X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=scpubgit%2Fstemmatology.git;a=blobdiff_plain;f=lib%2FText%2FTradition%2FCollation%2FReading%2FWordForm.pm;h=ebfa445ab80a3a288824df9ba490c4dca5a72a0f;hp=4335857fdb1c6516d84435d14d0a466d5bc5b1c3;hb=75ae2b25a9925f075714d1471b211db3c30ffb10;hpb=4aed7cc51a1239fd06e7e85481f0545749dfe75b diff --git a/lib/Text/Tradition/Collation/Reading/WordForm.pm b/lib/Text/Tradition/Collation/Reading/WordForm.pm index 4335857..ebfa445 100644 --- a/lib/Text/Tradition/Collation/Reading/WordForm.pm +++ b/lib/Text/Tradition/Collation/Reading/WordForm.pm @@ -68,9 +68,8 @@ around BUILDARGS => sub { my $class = shift; my $args = @_ == 1 ? $_[0] : { @_ }; if( exists $args->{'JSON'} ) { - $DB::single = 1; my @data = split( / \/\/ /, $args->{'JSON'} ); - print STDERR "Attempting to parse " . $data[2] . " into structure"; + # print STDERR "Attempting to parse " . $data[2] . " into structure"; my $morph = Lingua::Features::Structure->from_string( $data[2] ); $args = { 'language' => $data[0], 'lemma' => $data[1], 'morphology' => $morph };