Index: openacs-4/packages/file-storage/sql/oracle/file-storage-package-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/sql/oracle/file-storage-package-create.sql,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/file-storage/sql/oracle/file-storage-package-create.sql	17 Sep 2002 21:03:24 -0000	1.4
+++ openacs-4/packages/file-storage/sql/oracle/file-storage-package-create.sql	17 May 2003 10:37:05 -0000	1.5
@@ -246,6 +246,8 @@
         -- allow child items to be added
         content_folder.register_content_type(v_folder_id,'content_revision','t');
         content_folder.register_content_type(v_folder_id,'content_folder','t');
+        content_folder.register_content_type(v_folder_id,'content_extlink','t');
+        content_folder.register_content_type(v_folder_id,'content_symlink','t');
 
         -- set up default permissions
         acs_permission.grant_permission(
@@ -612,6 +614,18 @@
             't'                        -- include_subtypes
         );
 
+        content_folder.register_content_type(
+            v_folder_id,               -- folder_id
+            'content_extlink',         -- content_type
+            't'                        -- include_subtypes
+        );
+
+        content_folder.register_content_type(
+            v_folder_id,               -- folder_id
+            'content_symlink',         -- content_type
+            't'                        -- include_subtypes
+        );
+
         -- Give the creator admin privileges on the folder
         acs_permission.grant_permission(
             v_folder_id,                             -- object_id
@@ -667,7 +681,18 @@
             content_folder.delete(v_rec.item_id);
         end if;
 
-        -- We may have to delete other items here, e.g., symlinks(future feature)
+        -- Instead of doing an if-else, we make sure we are deleting a folder.
+        if v_rec.content_type = 'content_symlink'
+        then
+            content_symlink.delete(v_rec.item_id);
+        end if;
+
+        -- Instead of doing an if-else, we make sure we are deleting a folder.
+        if v_rec.content_type = 'content_extlink'
+        then
+            content_extlink.delete(v_rec.item_id);
+        end if;
+
     end loop;
 end;
 /
