commit 36d46271716a69513b3d902d0b9cd93cc86e5afb
author Akron <nils@diewald-online.de> Tue Jun 20 13:24:10 2017 +0200
committer Akron <nils@diewald-online.de> Tue Jun 20 13:24:10 2017 +0200
tree ece958f1ba40a6af9f7f1fdcd525c8bfa71f916a
parent aaea246d0f9ae9a788b22ef3b93baec58e8fe92b

Fixed feature treatment in CMC morpho

Change-Id: I242027df72ac9cc67fa4b1845308ff0b16ea8caa

lib/KorAP/XML/Annotation/CMC/Morpho.pm

diff --git a/lib/KorAP/XML/Annotation/CMC/Morpho.pm b/lib/KorAP/XML/Annotation/CMC/Morpho.pm
index 94fd291..35335cd 100644
--- a/lib/KorAP/XML/Annotation/CMC/Morpho.pm
+++ b/lib/KorAP/XML/Annotation/CMC/Morpho.pm
@@ -13,9 +13,14 @@
 
       my $content = $token->hash->{fs}->{f};
 
+      my $array = $content->{fs}->{f};
+
+      # In case there is only a lemma/pos ...
+      $array = ref $array ne 'ARRAY' ? [$array] : $array;
+
       my $found;
 
-      foreach my $f (@{$content->{fs}->{f}}) {
+      foreach my $f (@$array) {
 
         # pos tag
         if (($f->{-name} eq 'pos') &&