Index: openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl,v
diff -u -N -r1.189.2.51 -r1.189.2.52
--- openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	13 May 2020 08:32:05 -0000	1.189.2.51
+++ openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	3 Jun 2020 18:02:02 -0000	1.189.2.52
@@ -836,12 +836,10 @@
 
     if { $entire_form_p } {
         set the_form [ns_getform]
-        if { $the_form ne "" } {
-            for { set i 0 } { $i < [ns_set size $the_form] } { incr i } {
-                set varname [ns_set key $the_form $i]
-                set varvalue [ns_set value $the_form $i]
-                lappend noprocessing_vars [list $varname $varvalue]
-            }
+        for { set i 0 } { $i < [ns_set size $the_form] } { incr i } {
+            set varname [ns_set key $the_form $i]
+            set varvalue [ns_set value $the_form $i]
+            lappend noprocessing_vars [list $varname $varvalue]
         }
     }