Index: openacs-4/packages/assessment/www/asm-admin/sessions.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/sessions.tcl,v
diff -u -N -r1.12 -r1.12.2.1
--- openacs-4/packages/assessment/www/asm-admin/sessions.tcl	17 Jul 2018 13:32:18 -0000	1.12
+++ openacs-4/packages/assessment/www/asm-admin/sessions.tcl	28 Mar 2023 12:46:30 -0000	1.12.2.1
@@ -23,8 +23,10 @@
 set folder_id [as::assessment::folder_id -package_id $package_id]
 set user_id [ad_conn user_id]
 set context_object_id $package_id
-set form [rp_getform]
-ns_set delkey $form status
+set form [ns_getform]
+if { $form ne "" } {
+    ns_set delkey $form status
+}
 set page_title [_ assessment.All_Users]
 if {[info exists assessment_id]} {
     as::assessment::data -assessment_id $assessment_id