From 1bf98ca8b5e6545cf98bf0aaab23d202bcf42e5b Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 6 Sep 2004 11:14:50 +0000 Subject: (explanations) redirect log where appropriate at install time --- perl-install/log.pm | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) (limited to 'perl-install/log.pm') diff --git a/perl-install/log.pm b/perl-install/log.pm index e14454b03..3e8826963 100644 --- a/perl-install/log.pm +++ b/perl-install/log.pm @@ -55,6 +55,12 @@ sub closeLog() { } else { close $LOG; close $LOG2 } } -sub explanations { c::syslog(c::LOG_INFO()|c::LOG_LOCAL1(), "@_") } +sub explanations { + if ($::isStandalone) { + c::syslog(c::LOG_INFO()|c::LOG_LOCAL1(), "@_"); + } else { + l(@_); + } +} 1; -- cgit v1.2.1