Changeset 743 for trunk

Timestamp:

06/11/15 17:18:44 (9 years ago)

Author:

Kris Deugau

Message:

/trunk

Shuffle a variable name for clarity and declaration location for scope.
Scope change seems to have been rendered unnecessary by other changes.

File:

• trunk/cgi-bin/IPDB.pm (modified) (3 diffs)

trunk/cgi-bin/IPDB.pm

@@ -2059 +2059 @@
 
   my @ret;
+  my @newfreelist;
   eval {
     $dbh->do("UPDATE allocations SET cidr = ? WHERE id = ?", undef, $newblock, $id);
@@ -2064 +2065 @@
     # find the netblock(s) that are now free
     my @workingblocks = $oldblock->split($newblock->masklen);
-    my @wb2;
     foreach my $newsub (@workingblocks) {
       next if $newsub == $newblock;
-      push @wb2, $newsub;
-    }
-    @wb2 = Compact(@wb2);
+      push @newfreelist, $newsub;
+    }
+    @newfreelist = Compact(@newfreelist);
 
     # set new freeblocks, and clean up any IP pool entries if needed.
-    foreach my $newfree (@wb2) {
+    foreach my $newfree (@newfreelist) {
       my @clist;
       # the block we're munging
@@ -2093 +2093 @@
       }
 
-    } # $newfree (@wb2)
+    } # $newfree (@newfreelist)
 
     # additional cleanup on net/gw/bcast IPs in pool