Changeset 78 for trunk

Timestamp:

09/10/25 12:23:21 (5 days ago)

Author:

Kris Deugau

Message:

/trunk/dnsbl

Remove a duplicate instantiation
Add a little QoL by way of automatically setting the org on a subblock to
match the parent when not provided

File:

• trunk/dnsbl/dnsbl.cgi (modified) (2 diffs)

trunk/dnsbl/dnsbl.cgi

@@ -46 +46 @@
 }
 
-my $dnsbl = new DNSBL;
 # here be drag'ns, should theoretically be $DNSBL::maxlvl, but we
 # only have up to level 4 in the report HTML/template
@@ -159 +158 @@
   for (my $i = 0; $i <= $maxlvl; $i++) {
     my $orgn = "org$i";
+    if ($i > 0 && !$webvar{orgn}) {
+      # use parent org instead of "null" org for subblocks
+      $webvar{$orgn} = $webvar{"org".($i-1)};
+    }
     my $blockn = "block$i";
     my $commentn = "comment$i";