Index: openacs-4/packages/forums/tcl/forums-callback-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/tcl/forums-callback-procs.tcl,v diff -u -r1.1.2.1 -r1.1.2.2 --- openacs-4/packages/forums/tcl/forums-callback-procs.tcl 19 Jul 2005 21:43:13 -0000 1.1.2.1 +++ openacs-4/packages/forums/tcl/forums-callback-procs.tcl 20 Jul 2005 15:37:41 -0000 1.1.2.2 @@ -90,3 +90,18 @@ return $result } + + +ad_proc -public -callback datamanager::move_forum -impl datamanager { + -object_id:required + -selected_community:required +} { + Move a faq to another class or community +} { + +#update forums_forums table +db_dml update_forums {} +#update acs_objects table (because data redundancy) +db_dml update_forums_acs_objects {} +} +