Index: openacs-4/packages/cms/tcl/install-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/cms/tcl/install-procs.tcl,v
diff -u -r1.1 -r1.1.2.1
--- openacs-4/packages/cms/tcl/install-procs.tcl	9 May 2005 22:44:48 -0000	1.1
+++ openacs-4/packages/cms/tcl/install-procs.tcl	6 Jun 2005 15:34:55 -0000	1.1.2.1
@@ -1,11 +1,25 @@
 ad_library {
     install callbacks
 }
+
 namespace eval cms::install {}
+
 ad_proc -public cms::install::package_instantiate { -package_id } {
     Procedures to run on package instantiation
 } {
+    # create modules for new instance
     cm::modules::install::create_modules -package_id $package_id
+
+    set subsite_dir "/www"
+    append subsite_dir [site_node::get_url_from_object_id -object_id [ad_conn subsite_id]]
+    # check that directory exists and...
+    if { ![file exists $subsite_dir] } {
+	file mkdir $subsite_dir
+    }
+
+    # copy content delivery .vuh file to subsite root
+    file copy -force /packages/cms/www/index.vuh $subsite_dir
+    
 }
 
 ad_proc -public cms::install::package_uninstantiate { -package_id } {