Index: openacs-4/packages/acs-subsite/tcl/subsite-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/subsite-procs.tcl,v
diff -u -r1.70 -r1.71
--- openacs-4/packages/acs-subsite/tcl/subsite-procs.tcl	11 Sep 2024 06:15:48 -0000	1.70
+++ openacs-4/packages/acs-subsite/tcl/subsite-procs.tcl	8 Oct 2024 13:55:52 -0000	1.71
@@ -247,7 +247,7 @@
     set info [site_node::get_from_object_id -object_id $subsite_id]
     if {[info exists array]} {
         upvar $array subsite_info
-        array unset subsite_info
+        unset -nocomplain subsite_info
         array set subsite_info $info
     }
     return $info