Index: openacs-4/packages/proctoring-support/lib/proctored-page.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/proctoring-support/lib/Attic/proctored-page.tcl,v
diff -u -N -r1.1.2.10 -r1.1.2.11
--- openacs-4/packages/proctoring-support/lib/proctored-page.tcl	14 Jun 2021 15:35:18 -0000	1.1.2.10
+++ openacs-4/packages/proctoring-support/lib/proctored-page.tcl	21 Nov 2021 20:26:06 -0000	1.1.2.11
@@ -64,6 +64,10 @@
            proctoring will happen), 'proctoring_banner' (message in
            the red proctoring banner). Any of those fields can be
            omitted and will default to message keys in this package.
+    @param record_p should requested proctoring content (audio, images) be
+           recorded (default true). This flag is useful to turn off
+           recording of proctored content for e.g. mock exams to avoid
+           privacy issues.
 } {
     object_url:localurl
     object_id:naturalnum,notnull
@@ -80,6 +84,7 @@
     {examination_statement_p:boolean true}
     {examination_statement_url:localurl "/proctoring/examination-statement-accept"}
     {upload_p:boolean true}
+    {record_p:boolean true}
     {upload_url:localurl "/proctoring/upload"}
     msg:array,optional
 }
@@ -128,8 +133,9 @@
 set audio_p [expr {$audio_p ? true : false}]
 set camera_p [expr {$camera_p ? true : false}]
 set desktop_p [expr {$desktop_p ? true : false}]
+set record_p [expr {$record_p ? true : false}]
 
-#ns_log notice "PROCTORED PAGE sees desktop_p $desktop_p, camera_p $camera_p, examination_statement_p $examination_statement_p preview_p $preview_p"
+#ns_log notice "PROCTORED PAGE sees desktop_p $desktop_p, camera_p $camera_p, examination_statement_p $examination_statement_p preview_p $preview_p record_p $record_p"
 
 #
 # Local variables: