Index: openacs-4/packages/acs-subsite/www/admin/site-map/instance-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/site-map/instance-delete.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/acs-subsite/www/admin/site-map/instance-delete.tcl	10 Jan 2007 21:22:08 -0000	1.9
+++ openacs-4/packages/acs-subsite/www/admin/site-map/instance-delete.tcl	27 Oct 2014 16:39:56 -0000	1.10
@@ -10,7 +10,6 @@
 
 } {
     package_id:naturalnum
-    {root_id ""}
 }
 db_transaction {
 
@@ -25,11 +24,10 @@
     # will go to the deleted node's parent page which should either be the site map page
     # you were at when you clicked "delete" or its parent (the case mentioned above).
 
-    set parent \
-        [site_node::closest_ancestor_package \
-            -node_id $node_id \
-            -package_key acs-subsite \
-            -element url]
+    set parent [site_node::closest_ancestor_package \
+		    -node_id $node_id \
+		    -package_key acs-subsite \
+		    -element url]
 
     # node_id was null so we're not deleting a mounted subsite instance
     if {$parent eq "" } {