Revision 48baa5eb
Von Martin Helmling martin.helmling@octosoft.eu vor etwa 7 Jahren hinzugefügt
| SL/Controller/File.pm | ||
|---|---|---|
| 350 | 350 |
foreach my $id_version (@{ $::form->{$ids} || [] }) {
|
| 351 | 351 |
my ($id, $version) = split /_/, $id_version; |
| 352 | 352 |
my $dbfile = SL::File->get(id => $id); |
| 353 |
$dbfile->version($version) if $dbfile && $version; |
|
| 354 |
if ( $dbfile && $dbfile->delete ) {
|
|
| 355 |
$files .= ' ' . $dbfile->file_name; |
|
| 353 |
if ( $dbfile ) {
|
|
| 354 |
if ( $version ) {
|
|
| 355 |
$dbfile->version($version); |
|
| 356 |
$files .= ' ' . $dbfile->file_name if $dbfile->delete_version; |
|
| 357 |
} else {
|
|
| 358 |
$files .= ' ' . $dbfile->file_name if $dbfile->delete; |
|
| 359 |
} |
|
| 356 | 360 |
} |
| 357 | 361 |
} |
| 358 | 362 |
$self->js->flash('info', $infotext . $files) if $files;
|
Auch abrufbar als: Unified diff
Dateimanagement: Checkbox zum Löschen/Umbenennen fehlt teilweise bei ERP-Dokumenten
Umgebaut, damit jede einzelne Version eines Dokumentes löschbar ist
fix #51