summaryrefslogtreecommitdiffstats
path: root/perl-install/log.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>1999-07-31 17:49:30 +0000
committerPascal Rigaux <pixel@mandriva.com>1999-07-31 17:49:30 +0000
commit416760cf6e1a2bcd8080388e290fa12e3e74c377 (patch)
tree2b841530dcd292a2559218349f0881c60d410999 /perl-install/log.pm
parent91419eac51774d733b905ac2d54b3bde60a208df (diff)
downloaddrakx-416760cf6e1a2bcd8080388e290fa12e3e74c377.tar
drakx-416760cf6e1a2bcd8080388e290fa12e3e74c377.tar.gz
drakx-416760cf6e1a2bcd8080388e290fa12e3e74c377.tar.bz2
drakx-416760cf6e1a2bcd8080388e290fa12e3e74c377.tar.xz
drakx-416760cf6e1a2bcd8080388e290fa12e3e74c377.zip
no_comment
Diffstat (limited to 'perl-install/log.pm')
-rw-r--r--perl-install/log.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/log.pm b/perl-install/log.pm
index 1ccbbf315..00148127a 100644
--- a/perl-install/log.pm
+++ b/perl-install/log.pm
@@ -19,7 +19,9 @@ sub ld { $logDebugMessages and &l }
sub w { &l }
sub openLog(;$) {
- if ($_[0]) { # useLocal
+ if ($::isStandalone) {
+ open LOG, ">&STDERR";
+ } elsif ($_[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 :(";