Eliminated duplicate "Rule: "

[clearscm.git] / maps / bin / processaction.cgi

diff --git a/maps/bin/processaction.cgi b/maps/bin/processaction.cgi
index 02c3b27..229a2c3 100755 (executable)
--- a/maps/bin/processaction.cgi
+++ b/maps/bin/processaction.cgi
@@ -18,6 +18,7 @@ use warnings;
 use FindBin;
 
 use lib "$FindBin::Bin/../lib";
+use lib "$FindBin::Bin/../../lib";
 
 use MAPS;
 use MAPSWeb;
@@ -101,7 +102,10 @@ sub PrintInputLine ($$$$$) {
       ($pattern, $domain) = split /\@/, $email;
     } # if
 
-    $hit_count = CountMsg($email);
+    $hit_count = CountEmail(
+      userid => $userid,
+      additional => "sender like '%$email%'",
+    );
   } # if
 
   print Tr [