summaryrefslogtreecommitdiffstats
path: root/perl-install/log.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>1999-09-09 09:02:47 +0000
committerPascal Rigaux <pixel@mandriva.com>1999-09-09 09:02:47 +0000
commit1d3ac921d66022bb6e19a96dce95472cc31f0987 (patch)
tree4da18678cee71134f6cec6004f0b41afe6d25145 /perl-install/log.pm
parentdb4013c2a40eaeb3752cc69623037e4bb274693b (diff)
downloaddrakx-1d3ac921d66022bb6e19a96dce95472cc31f0987.tar
drakx-1d3ac921d66022bb6e19a96dce95472cc31f0987.tar.gz
drakx-1d3ac921d66022bb6e19a96dce95472cc31f0987.tar.bz2
drakx-1d3ac921d66022bb6e19a96dce95472cc31f0987.tar.xz
drakx-1d3ac921d66022bb6e19a96dce95472cc31f0987.zip
no_comment
Diffstat (limited to 'perl-install/log.pm')
-rw-r--r--perl-install/log.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/log.pm b/perl-install/log.pm
index 3f119b365..b1428408d 100644
--- a/perl-install/log.pm
+++ b/perl-install/log.pm
@@ -27,7 +27,7 @@ sub w { &l }
sub openLog(;$) {
if ($::isStandalone) {
open LOG, ">&STDERR";
- } elsif ($_[0]) { # useLocal
+ } 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 :(";
@@ -44,4 +44,4 @@ sub closeLog() { close LOG; close LOG2; }
#-######################################################################################
#- Wonderful perl :(
#-######################################################################################
-1; #
+1;