");
+ if (($env{'form.readfile'}) || ($env{'form.bookmarks'})) {
+ $r->print(&checkbox($ctr-1));
+ } else {
+ $r->print(&movers($clen,$ctr));
+ }
+ }
$r->print(&hidden($ctr-1,$thash{$key},$key));
- $r->print(" | ");
- $r->print(&select_box($clen,$ctr));
- $r->print(" | ");
- $r->print("");
- $r->print(" | ");
- $r->print("$thash{$key} | \n");
- $r->print("$key |
\n");
- } sort {$shash{$a}<=>$shash{$b}} (keys %shash);
- $r->print("