Added mate morpho tests
Change-Id: I16ab6b777b0d9f1241b755e25f3e0682ce18baaa
diff --git a/lib/KorAP/Field/MultiTermToken.pm b/lib/KorAP/Field/MultiTermToken.pm
index e658f0d..4884e7f 100644
--- a/lib/KorAP/Field/MultiTermToken.pm
+++ b/lib/KorAP/Field/MultiTermToken.pm
@@ -109,6 +109,11 @@
# Both are attributes
# Order attributes by reference id
if (index($a->[5], '@:') == 0 && index($b->[5], '@:') == 0) {
+
+
+# use Data::Dumper;
+# die Dumper $a;
+
my ($a_id) = ($a->[0] =~ m/^<s>(\d+)/);
my ($b_id) = ($b->[0] =~ m/^<s>(\d+)/);
if ($a_id > $b_id) {