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.25 -r1.25.2.1 --- openacs-4/packages/file-storage/tcl/file-storage-procs-oracle.xql 20 Feb 2004 23:46:19 -0000 1.25 +++ openacs-4/packages/file-storage/tcl/file-storage-procs-oracle.xql 2 Apr 2004 04:04:47 -0000 1.25.2.1 @@ -153,7 +153,9 @@ - select content_item__get_id ( :name, :folder_id, 'f' ) + begin + :1 := content_item.get_id ( :name, :folder_id, 'f' ); + end;