Index: openacs-4/packages/imsld/tcl/imsld-install-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/tcl/imsld-install-procs.tcl,v
diff -u -r1.49 -r1.49.2.1
--- openacs-4/packages/imsld/tcl/imsld-install-procs.tcl	8 Jul 2009 16:22:40 -0000	1.49
+++ openacs-4/packages/imsld/tcl/imsld-install-procs.tcl	15 Aug 2009 15:44:41 -0000	1.49.2.1
@@ -1352,5 +1352,7 @@
     # allow subfolders inside our parent folder
     content::folder::register_content_type -folder_id $global_folder_id \
 	-content_type content_folder
+
+    return $global_folder_id
 }    
 
Index: openacs-4/packages/imsld/tcl/imsld-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/tcl/imsld-procs.tcl,v
diff -u -r1.117.2.1 -r1.117.2.2
--- openacs-4/packages/imsld/tcl/imsld-procs.tcl	28 Jul 2009 19:52:33 -0000	1.117.2.1
+++ openacs-4/packages/imsld/tcl/imsld-procs.tcl	15 Aug 2009 15:44:41 -0000	1.117.2.2
@@ -675,6 +675,10 @@
 			      -root_folder_id $dotlrn_root_folder_id \
 			      -resolve_index f] 
 
+    if { $global_folder_id eq "" } {
+	set global_folder_id [imsld::install::create_global_folder]
+    }
+
     return $global_folder_id
 }