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.2.1 -r1.4.2.2
--- openacs-4/packages/file-storage/sql/oracle/file-storage-package-create.sql	20 Mar 2003 22:12:50 -0000	1.4.2.1
+++ openacs-4/packages/file-storage/sql/oracle/file-storage-package-create.sql	21 Mar 2003 02:55:04 -0000	1.4.2.2
@@ -674,7 +674,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;
 /