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