Changeset 185 for trunk/dns.cgi
- Timestamp:
- 12/06/11 13:00:11 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/dns.cgi
r183 r185 1604 1604 $row{grpnum} = $_; 1605 1605 $row{whereami} = $uri_self; 1606 # for all that HTML::Template is supposed to keep the HTML out of the Perl, this is so much more compact... 1607 # $row{grpdisp} = ($_ == $cur ? "<b>$row{grpname}</b>" : $row{grpname}); 1608 $row{curgrp} = ($_ == $cur); 1609 $row{expanded} = isParent($dbh, $_, 'group', $cur, 'group'); 1610 $row{expanded} = 1 if $_ == $cur; 1606 $row{curgrp} = ($_ == $cur); 1607 $row{expanded} = isParent($dbh, $_, 'group', $cur, 'group'); 1608 $row{expanded} = 1 if $_ == $cur; 1611 1609 $row{subs} = fill_grptree($_,$cur,$indent.' '); 1612 1610 $row{indent} = $indent;
Note:
See TracChangeset
for help on using the changeset viewer.