Index: openacs-4/packages/acs-tcl/tcl/defs-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/defs-procs.tcl,v
diff -u -N -r1.81.2.2 -r1.81.2.3
--- openacs-4/packages/acs-tcl/tcl/defs-procs.tcl	30 Sep 2019 14:58:02 -0000	1.81.2.2
+++ openacs-4/packages/acs-tcl/tcl/defs-procs.tcl	1 Oct 2019 08:51:19 -0000	1.81.2.3
@@ -459,13 +459,10 @@
     @return The cached value.
 
 } {
-    set flush_p [expr {$delete_p || [info exists set]}]
-    if {$flush_p} {
+    if {$delete_p} {
         if {[nsv_exists ad_param_$key $parameter_name]} {
             nsv_unset ad_param_$key $parameter_name
         }
-    }
-    if {$delete_p} {
         return
     }
     if {[info exists set]} {