From cba4fede6001197482b3d6c79dd698aae4232339 Mon Sep 17 00:00:00 2001 From: Peter Palfrader Date: Sat, 24 Apr 2004 11:03:07 +0000 Subject: Print summary on notice level, not info, if it was requested manually --- Echolot/Report.pm | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) (limited to 'Echolot/Report.pm') diff --git a/Echolot/Report.pm b/Echolot/Report.pm index db32687..22e2bf9 100644 --- a/Echolot/Report.pm +++ b/Echolot/Report.pm @@ -20,7 +20,8 @@ use strict; use English; use Echolot::Log; -sub print_summary() { +sub print_summary(;$) { + my ($manual) = @_; my @addresses = sort { $a->{'address'} cmp $b->{'address'} } Echolot::Globals::get()->{'storage'}->get_addresses(); my %remailers = map { $_->{'address'} => $_ } Echolot::Globals::get()->{'storage'}->get_remailers(); @@ -42,7 +43,11 @@ sub print_summary() { }; }; }; - Echolot::Log::info($report); + if (defined $manual) { + Echolot::Log::notice($report); + } else { + Echolot::Log::info($report); + } return 1; }; -- cgit v1.2.3