Log: use the exported Reporter SYSLOG readonly

src/main/perl/Log.pm

@@ -8,6 +8,7 @@ package CAF::Log;
 use strict;
 use warnings;
 
+use CAF::Reporter qw($SYSLOG);
 use parent qw(CAF::Object);
 
 use LC::Exception qw (SUCCESS throw_error);
@@ -18,8 +19,6 @@ Readonly my $FH => 'FH';
 Readonly my $TSTAMP => 'TSTAMP';
 Readonly my $FILENAME => 'FILENAME';
 Readonly my $OPTS => 'OPTS';
-Readonly my $SYSLOG => 'SYSLOG';
-
 
 my $ec = LC::Exception::Context->new->will_store_all;
 
@@ -138,8 +137,6 @@ basename of the file without suffix (relevant for L<CAF::Reporter::syslog>).
 
 =cut
 
-# TODO: need to test $SYSLOG is same $SYSLOG of CAF::Reporter
-
 sub _initialize ($$$)
 {
     my ($self, $filename, $options) = @_;