From 734a753d6a3f5fe1479af41aed9ae0e3defb0213 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Mon, 27 Jan 2003 08:13:09 +0000
Subject: fix logdrake behaviour in mcc where logdrake would only log the first
 process.

another (rare indeed) case of a bug introduced because perl_checker
wanted us to localize a file handle :-(
---
 perl-install/standalone/logdrake | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'perl-install')

diff --git a/perl-install/standalone/logdrake b/perl-install/standalone/logdrake
index 6bb2de941..92e1f0d40 100755
--- a/perl-install/standalone/logdrake
+++ b/perl-install/standalone/logdrake
@@ -237,6 +237,8 @@ sub search {
     gtkflush();
 }
 
+local *F;
+
 sub parse_file {
   my ($file) = @_;#$_[0];
 
@@ -293,7 +295,7 @@ sub parse_file {
   $win_pb->destroy();
 
   if ($::isTail) {
-      local *F;
+      close F;
       open F, $file or die "E: $!";
       local $_;
       while (<F>) {}; #to prevent to output the file twice..
-- 
cgit v1.2.1