From f2b67a5be25a27b984dc5735c1a0a790a99ef6af Mon Sep 17 00:00:00 2001 From: Steve Campbell Date: Thu, 30 Jun 2005 10:12:42 +0000 Subject: [PATCH] Tidied up some eval()ed code and removed a duplicate pattern match. --- src/src/eximstats.src | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/src/src/eximstats.src b/src/src/eximstats.src index 015fc5806..080bf178f 100644 --- a/src/src/eximstats.src +++ b/src/src/eximstats.src @@ -1,5 +1,5 @@ #!PERL_COMMAND -w -# $Cambridge: exim/src/src/eximstats.src,v 1.9 2005/06/30 09:59:34 steve Exp $ +# $Cambridge: exim/src/src/eximstats.src,v 1.10 2005/06/30 10:12:42 steve Exp $ # Copyright (c) 2001 University of Cambridge. # See the file NOTICE for conditions of use and distribution. @@ -1769,10 +1769,10 @@ sub generate_parser { my $user_pattern_index = 0; foreach (@user_patterns) { $user_pattern_totals[$user_pattern_index] = 0; - $parser .= " if ($_) {\n"; - $parser .= " \$user_pattern_totals[$user_pattern_index]++ if $_;\n"; - $parser .= " \$user_pattern_interval_count[$user_pattern_index][(\$m_hour*60 + \$m_min)/$hist_interval]++;\n" if ($hist_opt > 0); - $parser .= " }\n"; + $parser .= " if ($_) {\n"; + $parser .= " \$user_pattern_totals[$user_pattern_index]++;\n"; + $parser .= " \$user_pattern_interval_count[$user_pattern_index][(\$m_hour*60 + \$m_min)/$hist_interval]++;\n" if ($hist_opt > 0); + $parser .= " }\n"; $user_pattern_index++; } -- 2.25.1