X-Git-Url: https://defaria.com/gitweb/?a=blobdiff_plain;f=maps%2Fbin%2Fmapsutil.pl;h=15488fd063d449aa57abaead69d951c96d36d3f1;hb=294415e0b506d050524eecc134dc0fa0b5d57f49;hp=be9da97d48f9607c97a01235c4498c74ef89e2ac;hpb=dd45f3430c6ce7ad0633e2a7989c120372ef0b6f;p=clearscm.git 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($) {