Index: openacs-4/packages/file-storage/www/move-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/Attic/move-postgresql.xql,v
diff -u -r1.4.2.3 -r1.4.2.4
--- openacs-4/packages/file-storage/www/move-postgresql.xql 5 May 2006 19:26:23 -0000 1.4.2.3
+++ openacs-4/packages/file-storage/www/move-postgresql.xql 30 May 2006 10:37:45 -0000 1.4.2.4
@@ -15,7 +15,7 @@
- select fs.object_id, fs.name,
+ select fs.object_id, fs.name, fs.type, fs.parent_id,
acs_permission__permission_p(fs.object_id, :user_id, 'write') as move_p
from fs_objects fs
where fs.object_id in ([template::util::tcl_to_sql_list $object_id])
@@ -50,5 +50,27 @@
order by ci1.tree_sortkey, cf.label
+
+
+
+ select file_storage__copy_file(
+ :object_id,
+ :folder_id,
+ :user_id,
+ :peer_addr
+ )
+
+
+
+
+
+ select content_folder__copy (
+ :object_id,
+ :folder_id,
+ :user_id,
+ :peer_addr
+ )
+
+
\ No newline at end of file