| commit | 5f511d27e52e339ea59cb3914e5bcd1c48ef32e1 | [log] [tgz] |
|---|---|---|
| author | Akron <nils@diewald-online.de> | Tue Jan 05 20:54:34 2016 +0100 |
| committer | Akron <nils@diewald-online.de> | Tue Jan 05 20:54:34 2016 +0100 |
| tree | a7bc4c9a5d631b0cac5688b3eee14c193d6ca932 | |
| parent | 0b5cda29ab492067f8eae11cb5102d1b4a6ce191 [diff] [blame] |
Fix leading ptis for a XIP Change-Id: Ic0b8e2f31eceffc46d7c713439415e112e902d40
diff --git a/lib/KorAP/Index/XIP/Morpho.pm b/lib/KorAP/Index/XIP/Morpho.pm index 474bef0..2c82ba7 100644 --- a/lib/KorAP/Index/XIP/Morpho.pm +++ b/lib/KorAP/Index/XIP/Morpho.pm
@@ -43,9 +43,8 @@ # Composites my (@token) = split('#', $found); - if (@token == 1) { - next; - }; + next if @token == 1; + my $full = ''; foreach (@token) { $full .= $_;