- Timestamp:
- 11/02/12 16:15:16 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/cgi-bin/admin.cgi
r541 r542 103 103 $header->param(mainpage => 1); 104 104 105 $sth = $ip_dbh->prepare("select type,listname from alloctypes where listorder < 900 order by listorder");106 $sth->execute;107 108 105 my $tlist = getTypeList($ip_dbh, 'a'); 109 106 $tlist->[0]->{sel} = 1; … … 112 109 my $mlist = getMasterList($ip_dbh, 'm'); 113 110 $page->param(masterlist => $mlist); 114 115 111 } 116 112
Note:
See TracChangeset
for help on using the changeset viewer.