X-Git-Url: https://defaria.com/gitweb/?a=blobdiff_plain;f=maps%2Flib%2FMAPSLog.pm;h=b0b2c8516e18420cac0fef10458341bb442bb2fa;hb=0ce6b60d0dffe894fcefc01605e8c113b47362a2;hp=433de2b6d5d8502bccd1125f3b018ff582fddc90;hpb=8d6e59ba7728e19d42da1533b9f24d0216867899;p=clearscm.git diff --git a/maps/lib/MAPSLog.pm b/maps/lib/MAPSLog.pm index 433de2b..b0b2c85 100644 --- a/maps/lib/MAPSLog.pm +++ b/maps/lib/MAPSLog.pm @@ -24,6 +24,7 @@ use MAPS; use DateUtils; use Utils; +our @ISA = qw(Exporter); our @EXPORT = qw ( Debug Error @@ -34,12 +35,12 @@ our @EXPORT = qw ( ); our @Types = ( + 'nulllist', 'returned', 'whitelist', 'blacklist', 'registered', 'mailloop', - 'nulllist' ); sub nbr_msgs($) { @@ -105,6 +106,8 @@ sub Debug(%) { sub Error(%) { my (%params) = @_; + CheckParms(['userid', 'message'], \%params); + return Logmsg( userid => $params{userid}, type => 'error',