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.40 -r1.41
--- openacs-4/packages/acs-tcl/tcl/site-nodes-procs.tcl	22 Sep 2003 13:45:20 -0000	1.40
+++ openacs-4/packages/acs-tcl/tcl/site-nodes-procs.tcl	29 Sep 2003 11:52:31 -0000	1.41
@@ -130,15 +130,16 @@
     }
 
     # Default context id to the closest ancestor package_id
-    if {[empty_string_p $context_id]} {
+    if { [empty_string_p $context_id] } {
         set context_id [site_node::closest_ancestor_package -node_id $node_id]
     }
 
     # Instantiate the package
-    set package_id [apm_package_instance_new -package_id $package_id \
-                                             -package_key $package_key \
-                                             -instance_name $package_name \
-                                             -context_id $context_id]
+    set package_id [apm_package_instance_new \
+                        -package_id $package_id \
+                        -package_key $package_key \
+                        -instance_name $package_name \
+                        -context_id $context_id]
 
     # Mount the package
     site_node::mount -node_id $node_id -object_id $package_id