Merge "Introduce Log::Any to Annotations::Collector"
diff --git a/lib/KorAP/XML/TEI/Annotations/Collector.pm b/lib/KorAP/XML/TEI/Annotations/Collector.pm
index 9a7ea05..ed11d23 100644
--- a/lib/KorAP/XML/TEI/Annotations/Collector.pm
+++ b/lib/KorAP/XML/TEI/Annotations/Collector.pm
@@ -2,6 +2,7 @@
use base 'KorAP::XML::TEI::Annotations';
use KorAP::XML::TEI::Annotations::Annotation;
use Encode qw(encode decode);
+use Log::Any '$log';
use strict;
use warnings;
@@ -31,7 +32,7 @@
my ($self, $text_id, $param) = @_;
unless ($text_id) {
- warn 'Missing textID';
+ $log->warn('Missing textID');
return;
};
@@ -86,7 +87,7 @@
# Overwrite non-applicable boundary method
sub boundaries {
- warn 'Not supported';
+ $log->warn('Not supported');
};