Deleting bundles.
This commit is contained in:
parent
c49d53ce88
commit
ae57ce3e0f
1 changed files with 4 additions and 1 deletions
|
|
@ -177,7 +177,10 @@ sub www_manage {
|
|||
my $rows = '';
|
||||
my $getABundle = WebGUI::FilePump::Bundle->getAllIterator($session,{ orderBy => 'bundleName' } );
|
||||
while (my $bundle = $getABundle->()) {
|
||||
$rows .= sprintf '<tr><td> </td><td>%s</td>', $bundle->get('bundleName');
|
||||
$rows .= sprintf '<tr><td>%s</td><td>%s</td>',
|
||||
$session->icon->delete('op=filePump;func=deleteBundle;bundleId='.$bundle->getId),
|
||||
$bundle->get('bundleName')
|
||||
;
|
||||
}
|
||||
my $output = sprintf <<EOHTML, $i18n->get('bundle name'), $rows;
|
||||
<table border="1">
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue