Changeset 541 for trunk/cgi-bin/main.cgi

Timestamp:

11/02/12 15:54:31 (11 years ago)

Author:

Kris Deugau

Message:

/trunk

Start on SQL in admin.cgi. See #34.

• Convert Q-n-D allocation list on main page to use existing getTypeList()
• Convert timestamp-update master block list to use new getMasterList(), with a flag set to return the last-modified time. Also convert main.cgi new assignment page to use this, with the flag set to not return the lastmod.
• Tweak admin main template to match

While following the code for the master block list, I also removed
several useless globals (@masterblocks, %allocated, %free, and
%routed) since they were only used originally in one place (index
page from main.cgi), obsoleted by changes in r523, and in fact got
overridden locally before that anyway.

File:

• trunk/cgi-bin/main.cgi (modified) (1 diff)

trunk/cgi-bin/main.cgi

@@ -338 +338 @@
     }
   } else {
-    my @masterlist;
-    foreach my $master (@masterblocks) {
-      my %row = (master => "$master");
-      push (@masterlist, \%row);
-    }
-    $page->param(masterlist => \@masterlist);
+    my $mlist = getMasterList($ip_dbh, 'c');
+    $page->param(masterlist => $mlist);
 
     my @pops;