Bug 28835: Fix ability to pass list contents to batch record modification

Bug 12759 added the ability to pass list contents to batch record
modification/deletion tools.
Patch Bug 22417 [Restore the 'add to list' feature] removed the fetch
of lists in batch_record_modification.pl I don't understand why.
It still exists in batch_delete_records.pl.

Note that this is needed when first form is displayed.

Test plan :
1) Create a private and a public list of records
2) Open Tools > Batch record modification
3) Check you can use the lists
4) Open Tools > Batch record deletion
5) Check you can use the lists

Signed-off-by: Lucas Gass <lucas@bywatersolutions.com>

Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
(cherry picked from commit 533640b077)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
This commit is contained in:
Fridolin Somers 2021-08-09 23:14:03 -10:00
parent db13ebf165
commit ddd7398713
2 changed files with 15 additions and 3 deletions

View File

@ -44,13 +44,19 @@ my ($template, $loggedinuser, $cookie) = get_template_and_user({
flagsrequired => { tools => 'records_batchdel' },
});
$template->param( lists => scalar Koha::Virtualshelves->search([{ category => 1, owner => $loggedinuser }, { category => 2 }]) );
my @records;
my @messages;
if ( $op eq 'form' ) {
# Display the form
$template->param( op => 'form' );
$template->param(
op => 'form',
lists => scalar Koha::Virtualshelves->search(
[
{ category => 1, owner => $loggedinuser },
{ category => 2 }
]
)
);
} elsif ( $op eq 'list' ) {
# List all records to process
my @record_ids;

View File

@ -81,6 +81,12 @@ if ( $op eq 'form' ) {
# Display the form
$template->param(
view => 'form',
lists => scalar Koha::Virtualshelves->search(
[
{ category => 1, owner => $loggedinuser },
{ category => 2 }
]
)
);
} elsif ( $op eq 'list' ) {
# List all records to process