|
Lines 36-50
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
Link Here
|
| 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 |
- |
|
|