|
Lines 43-49
my $subscriptionid = $query->param('subscriptionid');
Link Here
|
| 43 |
|
43 |
|
| 44 |
# Permission needed if it is a deletion (del) : delete_subscription |
44 |
# Permission needed if it is a deletion (del) : delete_subscription |
| 45 |
# Permission needed otherwise : * |
45 |
# Permission needed otherwise : * |
| 46 |
my $permission = ($op eq "cud-del") ? "delete_subscription" : "*"; |
46 |
|
|
|
47 |
my %permissions = ( |
| 48 |
"cud-del" => "delete_subscription", |
| 49 |
"cud-close" => "edit_subscription", |
| 50 |
"reopen" => "edit_subscription", |
| 51 |
); |
| 52 |
|
| 53 |
my $permission = $permissions{$op} // "*"; |
| 47 |
|
54 |
|
| 48 |
my ($template, $loggedinuser, $cookie) |
55 |
my ($template, $loggedinuser, $cookie) |
| 49 |
= get_template_and_user({template_name => "serials/subscription-detail.tt", |
56 |
= get_template_and_user({template_name => "serials/subscription-detail.tt", |
| 50 |
- |
|
|