Index: openacs-4/packages/datamanager/www/use-faq.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/datamanager/www/Attic/use-faq.tcl,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/datamanager/www/use-faq.tcl 23 Sep 2005 14:30:37 -0000 1.1.2.1 @@ -0,0 +1,32 @@ +ad_page_contract { + Just call the callback implemented in faqs package + @author Luis de la Fuente(lfuente@it.uc3m.es) + @creation_date 2005-07-05 + +} -query { + object_id:integer,notnull + action:notnull + selected_community:integer,notnull +} -properties { +} + +set context [list []] +set title "[_ datamanager.Confirmation]" + +switch $action { + "move" { + callback -catch datamanager::move_faq -object_id $object_id -selected_community $selected_community + } + "copy" { + callback -catch datamanager::copy_faq -object_id $object_id -selected_community $selected_community + } + "delete" { + } + default { + } +} + + + + +ad_returnredirect "./"