Index: openacs-4/packages/file-storage/www/move-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/move-oracle.xql,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/file-storage/www/move-oracle.xql	23 Oct 2008 13:59:02 -0000	1.7
+++ openacs-4/packages/file-storage/www/move-oracle.xql	9 Dec 2008 09:02:31 -0000	1.8
@@ -16,7 +16,7 @@
   <fullquery name="get_move_objects">
     <querytext>
       select fs.object_id, fs.name, fs.type, fs.parent_id,
-      acs_permission.permission_p(fs.object_id, :user_id, 'write') as move_p
+      acs_permission.permission_p(fs.object_id, :user_id, 'delete') as move_p
       from fs_objects fs
       where fs.object_id in ([template::util::tcl_to_sql_list $object_id])
 	order by move_p