Index: openacs-4/packages/acs-tcl/tcl/deprecated-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/deprecated-procs.tcl,v
diff -u -N -r1.29.2.7 -r1.29.2.8
--- openacs-4/packages/acs-tcl/tcl/deprecated-procs.tcl	24 Jul 2020 12:19:55 -0000	1.29.2.7
+++ openacs-4/packages/acs-tcl/tcl/deprecated-procs.tcl	28 Jul 2020 14:42:05 -0000	1.29.2.8
@@ -3389,16 +3389,8 @@
     return [util::ns_set_to_tcl_string $set_id]
 }
 
-ad_proc -public util::ns_set_to_tcl_string {set_id} {
-    returns a plain text version of the passed ns_set id
-} {
-    set result ""
-    for {set i 0} {$i<[ns_set size $set_id]} {incr i} {
-        append result "[ns_set key $set_id $i] : [ns_set value $set_id $i]\n"
-    }
-    return $result
-}
 
+
 ad_proc -deprecated get_referrer args {
     @return referrer from the request headers.
     @param relative return the refer without protocol and host
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.61 -r1.189.2.62
--- openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	28 Jul 2020 11:11:33 -0000	1.189.2.61
+++ openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	28 Jul 2020 14:42:05 -0000	1.189.2.62
@@ -3847,6 +3847,16 @@
 
 namespace eval util {
 
+    ad_proc -public ::util::ns_set_to_tcl_string {set_id} {
+        returns a plain text version of the passed ns_set id
+    } {
+        set result ""
+        for {set i 0} {$i<[ns_set size $set_id]} {incr i} {
+            append result "[ns_set key $set_id $i] : [ns_set value $set_id $i]\n"
+        }
+        return $result
+    }
+
     ad_proc ::util::inline_svg_from_dot {{-css ""} dot_code} {
 
         Transform a dot source code into an inline svg image based on