Changeset 239 for trunk/dns.cgi

Timestamp:

02/23/12 15:36:59 (12 years ago)

Author:

Kris Deugau

Message:

/trunk

Checkpoint; domain/reverse zone list almost complete. See #26.
Still need to do active/inactive

File:

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

trunk/dns.cgi

@@ -300 +300 @@
 
 } elsif ($webvar{page} eq 'domlist' or $webvar{page} eq 'index') {
+
+  $page->param(domlist => 1);
 
 # hmm.  seeing problems in some possibly-not-so-corner cases.
@@ -1960 +1962 @@
         offset => $webvar{offset}, sortby => $sortby, sortorder => $sortorder
         ) );
-  foreach (@$zonelist) {
-    $_->{sid} = $sid;
-    $_->{domain_edit} = ($permissions{admin} || $permissions{domain_edit});
-    $_->{domain_delete} = ($permissions{admin} || $permissions{domain_delete});
-  }
+# probably don't need this, keeping for reference for now
+#  foreach (@$zonelist) {
+#  }
   $page->param(domtable => $zonelist);
 } # end listdomains()