Index: openacs-4/packages/acs-tcl/tcl/security-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/security-procs.tcl,v
diff -u -r1.126.2.80 -r1.126.2.81
--- openacs-4/packages/acs-tcl/tcl/security-procs.tcl	27 Nov 2022 17:55:10 -0000	1.126.2.80
+++ openacs-4/packages/acs-tcl/tcl/security-procs.tcl	20 Feb 2023 15:48:46 -0000	1.126.2.81
@@ -3045,9 +3045,9 @@
             lappend $var $value
         }
         if {$force_p} {
-            ns_log notice "CSP: forcing $directive $value"
             set var ::__csp__directive_forced($directive)
             if {![info exists $var] || $value ni [set $var]} {
+                ns_log notice "CSP: forcing $directive $value"
                 lappend $var $value
             }
         }