Index: openacs-4/packages/proctoring-support/lib/proctoring-enforce.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/proctoring-support/lib/Attic/proctoring-enforce.tcl,v
diff -u -N -r1.1.2.1 -r1.1.2.2
--- openacs-4/packages/proctoring-support/lib/proctoring-enforce.tcl	11 Aug 2020 07:01:02 -0000	1.1.2.1
+++ openacs-4/packages/proctoring-support/lib/proctoring-enforce.tcl	4 Jun 2021 11:27:55 -0000	1.1.2.2
@@ -8,8 +8,14 @@
 }
 
 if {[ns_conn isconnected]} {
-    set admin_p [permission::permission_p -object_id $object_id -party_id [ad_conn user_id] -privilege admin]
-    set read_p [permission::permission_p -object_id $object_id -party_id [ad_conn user_id] -privilege read]
+    set admin_p [permission::permission_p \
+                     -object_id $object_id \
+                     -party_id [ad_conn user_id] \
+                     -privilege admin]
+    set read_p [permission::permission_p \
+                    -object_id $object_id \
+                    -party_id [ad_conn user_id] \
+                    -privilege read]
 } else {
     set admin_p false
     set read_p false