From: tla Date: Fri, 15 Jun 2012 20:45:57 +0000 (+0200) Subject: fix morphology lookup sub name X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=scpubgit%2Fstemmatology.git;a=commitdiff_plain;h=227d4a1124cebc6d3149f886a3b0edc37fe7a3cd fix morphology lookup sub name --- diff --git a/lib/Text/Tradition/Language/Latin.pm b/lib/Text/Tradition/Language/Latin.pm index 5643351..df87505 100644 --- a/lib/Text/Tradition/Language/Latin.pm +++ b/lib/Text/Tradition/Language/Latin.pm @@ -140,7 +140,7 @@ sub morphology_tags { _morph_connect(); return unless $morph; # Simple morph DB lookup, and return the results. - my $result = $morph->lookup( $orig ); + my $result = $morph->lexicon_lookup( $orig ); return map { _wordform_from_row( $_ ) } @{$result->{'objects'}}; } @@ -158,4 +158,4 @@ sub _wordform_from_row { return $wf; } -1; \ No newline at end of file +1;