Index: openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs-oracle.xql,v diff -u -r1.4 -r1.4.2.1 --- openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs-oracle.xql 2 Apr 2004 01:44:53 -0000 1.4 +++ openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs-oracle.xql 28 May 2004 14:19:43 -0000 1.4.2.1 @@ -1,19 +1,18 @@ - oracle8.1.6 + oracle8.1.6 - declare - begin - :1 := file_storage.copy_file ( + begin + :1 := file_storage.copy_file ( file_id => :object_id, target_folder_id => :target_folder_id, - creation_user => :user_id, + creation_user => :user_id, creation_ip => null ); - end; + end;