From 64358086cfbaea4aa8f1eddc13161aff945523a8 Mon Sep 17 00:00:00 2001 From: Andrew DeFaria Date: Tue, 12 Oct 2021 04:31:39 -0700 Subject: [PATCH] Minor fixes --- maps/bin/maps | 2 +- maps/bin/mapsutil.pl | 18 ++++++++++++------ 2 files changed, 13 insertions(+), 7 deletions(-) diff --git a/maps/bin/maps b/maps/bin/maps index 4a9b64e..c5d3a8c 100755 --- a/maps/bin/maps +++ b/maps/bin/maps @@ -169,7 +169,7 @@ sub ProcessMsgs ($$$) { # Discard messges coming from andrew@clearscm.com because I don't send from # that email address if (lc $msgInfo{to} eq 'andrew@clearscm.com') { - $log->msg("Nullisting message from Andrew\@ClearSCM.com since I don't send from that email address"); + $log->msg("Nulllisting message from Andrew\@ClearSCM.com since I don't send from that email address"); next; } # if diff --git a/maps/bin/mapsutil.pl b/maps/bin/mapsutil.pl index be9da97..15488fd 100755 --- a/maps/bin/mapsutil.pl +++ b/maps/bin/mapsutil.pl @@ -203,7 +203,10 @@ sub LoadListFile($) { my $sequence = 0; - Info("Adding $listfilename to $listtype list"); + Info( + userid => $userid, + message => "Adding $listfilename to $listtype list", + ); while ($listfile) { chomp; @@ -253,18 +256,21 @@ sub LoadEmail($) { data => $msgInfo{data}, ); - Info("Added message from $msgInfo{sender} to email"); + Info( + userid => $userid, + message => "Added message from $msgInfo{sender} to email" + ); } # while if ($nbr_msgs == 0) { - say "No messages found to load"; + print "No messages found to load"; } elsif ($nbr_msgs == 1) { - say "Loaded 1 message"; + print "Loaded 1 message"; } else { - say "Loaded $nbr_msgs messages"; + print "Loaded $nbr_msgs messages"; } # if - say "from $file"; + say " from $filename"; } # LoadEmail sub DumpEmail($) { -- 2.17.1