From 88a07c82cece62903ae68e1e2c482d810bbf8560 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 29 Jul 1999 15:18:54 +0000 Subject: no_comment --- perl-install/log.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/log.pm') diff --git a/perl-install/log.pm b/perl-install/log.pm index 0fe696f07..640349b70 100644 --- a/perl-install/log.pm +++ b/perl-install/log.pm @@ -22,9 +22,9 @@ sub openLog(;$) { if ($_[0]) { # useLocal open LOG, "> $_[0]" or die "no log possible :("; } else { - open LOG, "> /dev/tty3" or open LOG, ">> /tmp/install.log" or die "no log possible :("; + open LOG, "> /dev/tty3" or open LOG, ">> /tmp/install.log";# or die "no log possible :("; } - open LOG2, ">> /tmp/ddebug.log" or die "no log possible :("; + open LOG2, ">> /tmp/ddebug.log";# or die "no log possible :("; select((select(LOG), $| = 1)[0]); select((select(LOG2), $| = 1)[0]); exists $ENV{DEBUG} and $logDebugMessages = 1; -- cgit v1.2.1