Index: openacs-4/packages/acs-subsite/www/shared/parameters.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/shared/parameters.tcl,v
diff -u -N -r1.25.2.2 -r1.25.2.3
--- openacs-4/packages/acs-subsite/www/shared/parameters.tcl	30 Apr 2019 18:54:47 -0000	1.25.2.2
+++ openacs-4/packages/acs-subsite/www/shared/parameters.tcl	13 Feb 2020 10:42:42 -0000	1.25.2.3
@@ -142,19 +142,11 @@
                         -package_id $package_id \
                         -parameter $c__parameter_name \
                         -value [set $c__parameter_name]
-                    callback subsite::parameter_changed \
-                        -package_id $package_id \
-                        -parameter $c__parameter_name \
-                        -value [set $c__parameter_name]
                 } else {
                     parameter::set_global_value \
                         -package_key $package_key \
                         -parameter $c__parameter_name \
                         -value [set $c__parameter_name]
-                    callback subsite::global_parameter_changed \
-                        -package_key $package_key \
-                        -parameter $c__parameter_name \
-                        -value [set $c__parameter_name]
                 }
             }
         }
Index: openacs-4/packages/acs-tcl/tcl/parameter-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/parameter-procs.tcl,v
diff -u -N -r1.26.2.1 -r1.26.2.2
--- openacs-4/packages/acs-tcl/tcl/parameter-procs.tcl	20 Feb 2019 18:22:51 -0000	1.26.2.1
+++ openacs-4/packages/acs-tcl/tcl/parameter-procs.tcl	13 Feb 2020 10:42:42 -0000	1.26.2.2
@@ -43,6 +43,11 @@
 
     db_exec_plsql set_parameter_value {}
 
+    callback subsite::global_parameter_changed \
+        -package_key $package_key \
+        -parameter $parameter \
+        -value $value
+
     return [ad_parameter_cache -set $value $package_key $parameter]
 }
 
@@ -103,7 +108,7 @@
     {-parameter:required}
     {-value:required}
 } {
-    Set the value of a package instance parameter
+    Set the value of a package instance parameter.
 
     @param package_id what package to set the parameter in. Defaults to
     [ad_conn package_id]
@@ -116,6 +121,11 @@
 
     db_exec_plsql set_parameter_value {}
 
+    callback subsite::parameter_changed \
+        -package_id $package_id \
+        -parameter $parameter \
+        -value $value
+
     return [ad_parameter_cache -delete -set $value $package_id $parameter]
 }