Index: openacs-4/packages/acs-tcl/tcl/site-nodes-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/site-nodes-procs.tcl,v
diff -u -N -r1.141.2.43 -r1.141.2.44
--- openacs-4/packages/acs-tcl/tcl/site-nodes-procs.tcl	14 Nov 2022 02:26:03 -0000	1.141.2.43
+++ openacs-4/packages/acs-tcl/tcl/site-nodes-procs.tcl	10 Jan 2023 14:59:10 -0000	1.141.2.44
@@ -1028,7 +1028,7 @@
                     }
                 }
 
-                set tree [::acs::dc list_of_lists -prepare {integer boolean} dbqd..get_subtree $sql]
+                set tree [::acs::dc list_of_lists -prepare integer,boolean dbqd..get_subtree $sql]
 
                 foreach entry $tree {
                     lassign $entry url node_id object_id