Index: openacs-4/packages/acs-tcl/tcl/apm-install-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/apm-install-procs.tcl,v
diff -u -r1.66 -r1.67
--- openacs-4/packages/acs-tcl/tcl/apm-install-procs.tcl	17 Oct 2003 08:41:49 -0000	1.66
+++ openacs-4/packages/acs-tcl/tcl/apm-install-procs.tcl	27 Oct 2003 15:06:36 -0000	1.67
@@ -1193,7 +1193,7 @@
     Creates the package directory if it doesn't already exist. Overwrites
     any existing specification file; or if none exists yet, creates
     $package_key/$package_key.info and adds this new file to apm_version_files
-    in the database.
+    in the database.  Adds minimal directories.
 
 } {
     set spec [apm_generate_package_spec $version_id]
@@ -1224,6 +1224,14 @@
 	puts -nonewline $file $spec
 	close $file
 
+        # create minimal directories
+        foreach dir {www www/doc tcl tcl/test sql sql/postgresql sql/oracle} {
+	set path "[acs_package_root_dir $package_key]/$dir"
+            if { ![file exists $path] } {
+                file mkdir $path
+            }
+        }
+
 	# Mark $version_id as the only installed version of the package.
 	db_dml version_mark_installed {
             update apm_package_versions