summaryrefslogtreecommitdiffstats
path: root/perl-install/log.pm
diff options
context:
space:
mode:
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 649ed30a0..ac024819f 100644
--- a/perl-install/log.pm
+++ b/perl-install/log.pm
@@ -19,7 +19,9 @@ sub F() { *LOG }
sub l {
$logOpen or openLog();
- if ($::isStandalone) {
+ if ($::testing) {
+ print STDERR @_, "\n";
+ } elsif ($::isStandalone) {
c::syslog(c::LOG_WARNING(), join("", @_));
} elsif ($::isInstall) {
print LOG "* ", @_, "\n";