X-Git-Url: https://defaria.com/gitweb/?a=blobdiff_plain;f=maps%2Fbin%2FMAPS.pm;h=eabe32ecece232451c7038df333d6145be9b3f90;hb=92a317c3620f3442f9452d834a1ed5f09bdddbf6;hp=bb0c368c3a23a11b12e05b4473721f86d4c4e06c;hpb=125b7d3905adb6a1ae9cf01b2c323a78ae31dc0a;p=clearscm.git

diff --git a/maps/bin/MAPS.pm b/maps/bin/MAPS.pm
index bb0c368..eabe32e 100644
--- a/maps/bin/MAPS.pm
+++ b/maps/bin/MAPS.pm
@@ -242,12 +242,12 @@ sub AddEmail ($$$) {
   MAPSDB::AddEmail $sender, $subject, $data;
 } # AddEmail
 
-sub AddList ($$$;$$) {
-  my ($listtype, $pattern, $sequence, $comment, $hit_count) = @_;
+sub AddList ($$$;$$$) {
+  my ($listtype, $pattern, $sequence, $comment, $hit_count, $last_hit) = @_;
 
   $hit_count //= CountMsg $pattern;
 
-  MAPSDB::AddList $listtype, $pattern, $sequence, $comment, $hit_count;
+  MAPSDB::AddList $listtype, $pattern, $sequence, $comment, $hit_count, $last_hit;
 } # AddList
 
 sub AddUser ($$$$) {