[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index] [Thread Index]

[SCM] Debian package checker branch, master, updated. 2.5.12-52-g07e7bdc



The following commit has been merged in the master branch:
commit 3e30a8fd91e86ccb38ba398a52d782df45dcb75b
Author: Niels Thykier <niels@thykier.net>
Date:   Sat Apr 27 17:34:51 2013 +0200

    r/harness: Remove bareword file handle
    
    Signed-off-by: Niels Thykier <niels@thykier.net>

diff --git a/reporting/harness b/reporting/harness
index 992931e..5f7c89c 100755
--- a/reporting/harness
+++ b/reporting/harness
@@ -58,6 +58,7 @@ END
   exit;
 }
 
+my $LOG_FD;
 my %opt = (
     'schedule-chuck-size' => 512,
 );
@@ -124,11 +125,11 @@ unless ($opt{'dry-run'}) {
         or die "Cannot rotate log files.\n";
 
     # create new log file
-    open(LOG, '>', $log_file)
+    open($LOG_FD, '>', $log_file)
         or die "cannot open log file $log_file for writing: $!";
 } else {
     $opt{'to-stdout'} = 0;
-    open LOG, '>&', \*STDOUT
+    open($LOG_FD, '>&', \*STDOUT)
         or die "Cannot open log file <stdout> for writing: $!";
     Log('Running in dry-run mode');
 }
@@ -469,7 +470,7 @@ exit 0;
 # -------------------------------
 
 sub Log {
-    print LOG $_[0],"\n";
+    print {$LOG_FD} $_[0],"\n";
     print $_[0], "\n" if $opt{'to-stdout'};
 }
 

-- 
Debian package checker


Reply to: