don't dump to STDERR if log is available

diff --git a/lib/WarnColor.pm b/lib/WarnColor.pm
index 14314d8..1a40fee 100644 (file)
--- a/lib/WarnColor.pm
+++ b/lib/WarnColor.pm
@@ -32,10 +32,12 @@ sub BEGIN {
                print STDERR "creating $log\n" unless -e $log;
 
                open(my $fh, '>>', $log);
-               print $fh $line;
-               close $fh;
-
-               print STDERR $line; # XXX debug
+               if ( $fh ) {
+                       print $fh $line;
+                       close $fh;
+               } else {
+                       print STDERR $line;
+               }
        }
 
 if ( -t STDOUT ) { # colorize only if run from terminal !