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 -r1.4.2.1 -r1.4.2.2
--- openacs-4/packages/acs-tcl/tcl/site-nodes-procs.tcl	10 Apr 2002 02:26:20 -0000	1.4.2.1
+++ openacs-4/packages/acs-tcl/tcl/site-nodes-procs.tcl	30 Apr 2002 01:16:49 -0000	1.4.2.2
@@ -168,7 +168,7 @@
     if {[string index $url end] != "/"} {
 	append url "/"
 	if {[catch {nsv_get site_nodes $url} result] == 0} {
-	    array set node [site_node $result]
+	    array set node $result
 	    if { [string eq $node(package_key) $package_key] } {
 		return $node(package_id)
 	    }