- Fixed wrong reference variables in im_timesheet_invoice_permissions

tcl/intranet-timesheet2-invoices-procs.tcl

@@ -28,15 +28,15 @@ ad_proc -public im_timesheet_invoice_permissions {
     Fill the "by-reference" variables read, write and admin
     with the permissions of $current_user_id on $user_id
 } {
-    upvar $view_var view
-    upvar $read_var read
-    upvar $write_var write
-    upvar $admin_var admin
-
-    set view 0
-    set read 0
-    set write 0
-    set admin 0
+    upvar $view_var view_p
+    upvar $read_var read_p
+    upvar $write_var write_p
+    upvar $admin_var admin_p
+
+    set view_p 0
+    set read_p 0
+    set write_p 0
+    set admin_p 0
 
     im_cost_permissions $current_user_id $invoice_id view_p read_p write_p admin_p