Lines 45-53
my $subscriptionid = $query->param('subscriptionid');
Link Here
|
45 |
# Permission needed otherwise : * |
45 |
# Permission needed otherwise : * |
46 |
|
46 |
|
47 |
my %permissions = ( |
47 |
my %permissions = ( |
48 |
"cud-del" => "delete_subscription", |
48 |
"cud-del" => "delete_subscription", |
49 |
"cud-close" => "edit_subscription", |
49 |
"cud-close" => "edit_subscription", |
50 |
"reopen" => "edit_subscription", |
50 |
"cud-reopen" => "edit_subscription", |
51 |
); |
51 |
); |
52 |
|
52 |
|
53 |
my $permission = $permissions{$op} // "*"; |
53 |
my $permission = $permissions{$op} // "*"; |
54 |
- |
|
|