version 1.341, 2012/03/15 13:27:25
|
version 1.342, 2012/03/15 15:02:59
|
Line 3482 END
|
Line 3482 END
|
} |
} |
} |
} |
} |
} |
|
if ((ref($currnewattach) eq 'ARRAY') && (@{$currnewattach} > 0)) { |
|
$r->print($lt{'chth'}.'<br />'."\n"); |
|
foreach my $attach (@{$currnewattach}) { |
|
$attach =~ m#/([^/]+)$#; |
|
$r->print('<label><input type="checkbox" name="delnewattach" value="'.$attach.'" /> '.$1.'</label><br />'."\n"); |
|
} |
|
} |
} |
} |
$r->print(&Apache::lonhtmlcommon::row_closure(1)); |
$r->print(&Apache::lonhtmlcommon::row_closure(1)); |
$r->print(&Apache::lonhtmlcommon::end_pick_box()); |
$r->print(&Apache::lonhtmlcommon::end_pick_box()); |