X-Git-Url: https://defaria.com/gitweb/?a=blobdiff_plain;f=maps%2Fbin%2Fmapsscrub.pl;h=abf1d3173c7a953e8317615a3bd572d138df375d;hb=24352d115ade3e1f4916df9c0102b1edb804f0c6;hp=91e77a8fcfd4c35a95e5e307ba9da2bc620aeec8;hpb=0ace35bef5b69543b6444447a7acf9bed8a9efd6;p=clearscm.git

diff --git a/maps/bin/mapsscrub.pl b/maps/bin/mapsscrub.pl
index 91e77a8..abf1d31 100755
--- a/maps/bin/mapsscrub.pl
+++ b/maps/bin/mapsscrub.pl
@@ -80,7 +80,9 @@ sub CleanUp($) {
   $total{'Log entries removed'} = CleanLog   $timestamp, $opts{dryrun};
 
   for (qw(white black null)) {
-    $total{"${_}list entries removed"} = CleanList(
+    my $listname = ucfirst($_) . 'list entries removed';
+
+    $total{$listname} = CleanList(
       userid => $userid,
       type   => $_,
       log    => $log,