diff options
author | Peter Palfrader <peter@palfrader.org> | 2003-02-16 14:42:41 +0000 |
---|---|---|
committer | Peter Palfrader <peter@palfrader.org> | 2003-02-16 14:42:41 +0000 |
commit | 4e4b74364edea060a70bda3bacc848eb2a26dad5 (patch) | |
tree | 4d23728ef57c46b7dcb0e0e2076a443b0357f23a /Echolot/Stats.pm | |
parent | c9b879f7fe2a5ee5346c9ecfb471006859ef763d (diff) |
Fix syntax
Diffstat (limited to 'Echolot/Stats.pm')
-rw-r--r-- | Echolot/Stats.pm | 10 |
1 files 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 <peter@palfrader.org> -# $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; |