Index: openacs-4/packages/faq/tcl/faq-callback-procs.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/faq/tcl/Attic/faq-callback-procs.xql,v diff -u -r1.1.2.2 -r1.1.2.3 --- openacs-4/packages/faq/tcl/faq-callback-procs.xql 23 Sep 2005 14:38:28 -0000 1.1.2.2 +++ openacs-4/packages/faq/tcl/faq-callback-procs.xql 10 Oct 2005 12:59:34 -0000 1.1.2.3 @@ -3,17 +3,46 @@ - update acs_objects - set context_id = (select package_id - from dotlrn_community_applets - where community_id = :selected_community and applet_id = ( - select applet_id from dotlrn_applets where applet_key = 'dotlrn_faq' - )) - where object_id = :object_id + update acs_objects + set context_id = :new_package_id,package_id=:new_package_id + where object_id = :object_id + + + + + update acs_objects + set package_id = :new_package_id + where context_id = :object_id + + + +SELECT package_id as new_package_id +FROM dotlrn_community_applets +WHERE community_id = :selected_community and applet_id = (select applet_id from dotlrn_applets where applet_key = 'dotlrn_faq') + + + + + + + UPDATE acs_objects + SET context_id = :trash_package_id,package_id=:trash_package_id + WHERE object_id = :object_id + + + + + + UPDATE acs_objects + SET package_id = :trash_package_id + WHERE context_id = :object_id + + + SELECT b.object_id as package_id