From 4e4b74364edea060a70bda3bacc848eb2a26dad5 Mon Sep 17 00:00:00 2001 From: Peter Palfrader Date: Sun, 16 Feb 2003 14:42:41 +0000 Subject: Fix syntax --- Echolot/Stats.pm | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/Echolot/Stats.pm b/Echolot/Stats.pm index e263463..5a100ea 100644 --- a/Echolot/Stats.pm +++ b/Echolot/Stats.pm @@ -1,7 +1,7 @@ package Echolot::Stats; # (c) 2002 Peter Palfrader -# $Id: Stats.pm,v 1.46 2003/02/16 14:40:43 weasel Exp $ +# $Id: Stats.pm,v 1.47 2003/02/16 14:42:41 weasel Exp $ # =pod @@ -572,14 +572,20 @@ sub build_lists() { my $broken1 = read_file( Echolot::Config::get()->{'broken1'}, 1); my $broken2 = read_file( Echolot::Config::get()->{'broken2'}, 1); my $sameop = read_file( Echolot::Config::get()->{'sameop'}, 1); - + my $privbroken1; + my $privbroken2; my $mixrems = build_rems(['mix']); my $cpunkrems = build_rems(['cpunk-rsa', 'cpunk-dsa', 'cpunk-clear']); + if (Echolot::Config::get()->{'do_chainpings'}) { $privbroken1 = find_broken_chains('cpunk', $cpunkrems, $broken1); $privbroken2 = find_broken_chains('mix', $mixrems, $broken2); + } else { + $privbroken1 = $broken1; + $privbroken2 = $broken2; }; + if (Echolot::Config::get()->{'show_chainpings'}) { $broken1 = $privbroken1; $broken2 = $privbroken2; -- cgit v1.2.3