From: Fabian Keil <fk@fabiankeil.de>
Date: Sat, 11 Dec 2010 15:36:47 +0000 (+0000)
Subject: Use a local scalar for the file handle.
X-Git-Tag: v_3_0_18~378
X-Git-Url: http://www.privoxy.org/gitweb/@default-cgi@/faq/%22https:/user-manual/static/@default-cgi@toggle?a=commitdiff_plain;h=6c2e362fe59850a5b9133e75364084b55da19901;p=privoxy.git

Use a local scalar for the file handle.
---

diff --git a/tools/privoxy-log-parser.pl b/tools/privoxy-log-parser.pl
index fb396758..b3a2e501 100755
--- a/tools/privoxy-log-parser.pl
+++ b/tools/privoxy-log-parser.pl
@@ -8,7 +8,7 @@
 #
 # http://www.fabiankeil.de/sourcecode/privoxy-log-parser/
 #
-# $Id: privoxy-log-parser.pl,v 1.268 2010/11/13 20:35:40 fk Exp $
+# $Id: privoxy-log-parser.pl,v 1.105 2010/11/13 20:37:39 fabiankeil Exp $
 #
 # TODO:
 #       - LOG_LEVEL_CGI, LOG_LEVEL_ERROR, LOG_LEVEL_WRITE content highlighting
@@ -571,9 +571,9 @@ sub log_parse_error ($) {
     my $message = shift;
 
     if (LOG_UNPARSED_LINES_TO_EXTRA_FILE) {
-        open(ERRORLOG, ">>" . ERROR_LOG_FILE) || die "Writing " . ERROR_LOG_FILE . " failed";
-        print ERRORLOG $message;
-        close(ERRORLOG);
+        open(my $errorlog_fd, ">>" . ERROR_LOG_FILE) || die "Writing " . ERROR_LOG_FILE . " failed";
+        print $errorlog_fd $message;
+        close($errorlog_fd);
     }
 }