View | Details | Raw Unified | Return to bug 34977
Collapse All | Expand All

(-)a/patron_lists/delete.pl (-8 / +7 lines)
Lines 29-50 my $cgi = CGI->new; Link Here
29
29
30
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
30
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
31
    {
31
    {
32
        template_name   => "patron_lists/lists.tt",
32
        template_name => "patron_lists/lists.tt",
33
        query           => $cgi,
33
        query         => $cgi,
34
        type            => "intranet",
34
        type          => "intranet",
35
        flagsrequired => { tools => 'manage_patron_lists' },
35
        flagsrequired => { tools => 'manage_patron_lists' },
36
    }
36
    }
37
);
37
);
38
38
39
my $id = $cgi->param('patron_list_id');
39
my $id        = $cgi->param('patron_list_id');
40
my @lists_ids = $cgi->multi_param('patron_lists_ids');
40
my @lists_ids = $cgi->multi_param('patron_lists_ids');
41
41
42
if (defined $id && $id ne '') {
42
if ( defined $id && $id ne '' ) {
43
    DelPatronList({ patron_list_id => $id });
43
    DelPatronList( { patron_list_id => $id } );
44
}
44
}
45
if (@lists_ids) {
45
if (@lists_ids) {
46
    foreach my $list_id (@lists_ids) {
46
    foreach my $list_id (@lists_ids) {
47
        DelPatronList({ patron_list_id => $list_id });
47
        DelPatronList( { patron_list_id => $list_id } );
48
    }
48
    }
49
}
49
}
50
50
51
- 

Return to bug 34977