Index: openacs-4/packages/file-storage/tcl/file-storage-callback-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/tcl/file-storage-callback-procs.tcl,v
diff -u -r1.1.2.12 -r1.1.2.13
--- openacs-4/packages/file-storage/tcl/file-storage-callback-procs.tcl	25 Nov 2005 11:42:46 -0000	1.1.2.12
+++ openacs-4/packages/file-storage/tcl/file-storage-callback-procs.tcl	3 Mar 2006 13:26:20 -0000	1.1.2.13
@@ -38,42 +38,8 @@
 } {
 }
 
-ad_proc -public -callback datamanager::move_folder -impl datamanager {
-     -object_id:required
-     -selected_community:required
-} {
-    Move a folder to another class or community
-} {
 
-#get the working package
-db_1row get_working_package {}
-set root_folder_id [fs::get_root_folder -package_id $package_id]
-    
-#update forums_forums table    
-    db_transaction {
-        db_dml update_cr_items {}
-        db_dml update_acs_objects {}
-    }
-}
 
-ad_proc -public -callback datamanager::delete_folder -impl datamanager {
-     -object_id:required
-} {
-    Move a folder to the trash
-} {
-
-#get the trash_id
-set trash_id [datamanager::get_trash_id]
-
-    db_transaction {
-        #update forums_forums table
-        db_dml del_update_cr_items {}
-        db_dml del_update_acs_objects {}
-    }
-}
-
-
-
 ad_proc -public -callback datamanager::copy_folder -impl datamanager {
      -object_id:required
      -selected_community:required
@@ -209,4 +175,4 @@
 	}
 	
 	
-    }      
\ No newline at end of file
+    }