logging to stdout if daemonize != yes

1 files changed, 4 insertions, 1 deletions

diff --git a/lib/PerlDaemon/Logger.pm b/lib/PerlDaemon/Logger.pm
index 2fecd60..41984d3 100644
--- a/lib/PerlDaemon/Logger.pm
+++ b/lib/PerlDaemon/Logger.pm
@@ -14,11 +14,14 @@ sub logmsg ($$) {
 	my ($self, $msg) = @_;
 	my $conf = $self->{conf};
 	my $logfile = $conf->{'daemon.logfile'};
+        my $logline = localtime()." (PID $$): $msg\n";
 
 	open my $fh, ">>$logfile" or die "Can't write logfile $logfile: $!\n";
-	print $fh localtime()." (PID $$): $msg\n";
+	print $fh $logline;
 	close $fh;
 
+        print $logline if $conf->{'daemon.daemonize'} ne 'yes';
+
         return undef;
 }