Index: openacs-4/packages/file-storage/tcl/file-storage-procs-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/tcl/file-storage-procs-oracle.xql,v diff -u -r1.1 -r1.2 --- openacs-4/packages/file-storage/tcl/file-storage-procs-oracle.xql 13 Aug 2001 01:02:59 -0000 1.1 +++ openacs-4/packages/file-storage/tcl/file-storage-procs-oracle.xql 22 Sep 2001 05:39:21 -0000 1.2 @@ -18,7 +18,7 @@ begin - :1 := content_folder.get_label(:folder_id); + :1 := file_storage.get_folder_name(:folder_id); end; @@ -68,7 +68,7 @@ begin - :1 := content_item.get_title(:item_id); + :1 := file_storage.get_title(:item_id); end; @@ -78,11 +78,11 @@ - select case when content_item.get_content_type(i.item_id) = 'content_folder' - then '?folder_id=' - else 'file?file_id=' + select case when file_storage.get_content_type(i.item_id) = 'content_folder' + then 'index?folder_id=' + else 'file?file_id=' end || i.item_id, - content_item.get_title(i.item_id) + file_storage.get_title(i.item_id) from cr_items i where item_id not in ( select i2.item_id