Skip to content

I
intranet-riskmanagement
Commit 43ea9caa authored by Frank Bergmann's avatar Frank Bergmann
Browse files
Options

- Fixed riskmanagement delete

parent 707671cc
Hide whitespace changes
Inline Side-by-side
Showing with 1 addition and 1 deletion
www/action.tcl
View file @ 43ea9caa
...@@ -33,7 +33,7 @@ switch [string tolower $action] { ...@@ -33,7 +33,7 @@ switch [string tolower $action] {
delete { delete {
# Delete # Delete
foreach rid [array names risk_id] { foreach rid [array names risk_id] {
im_risk_permissions $user_id $risk_project_id view read write admin im_risk_permissions $user_id $rid view read write admin
if {!$write} { if {!$write} {
ad_return_complaint 1 $action_forbidden_msg ad_return_complaint 1 $action_forbidden_msg
ad_script_abort ad_script_abort
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment