Index: openacs-4/packages/dotlrn-invoices/tcl/dotlrn-invoices-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-invoices/tcl/dotlrn-invoices-procs.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/dotlrn-invoices/tcl/dotlrn-invoices-procs.tcl 9 Sep 2005 16:27:35 -0000 1.4 +++ openacs-4/packages/dotlrn-invoices/tcl/dotlrn-invoices-procs.tcl 26 Oct 2005 22:44:37 -0000 1.5 @@ -122,7 +122,9 @@ invoices_offers_portlet::add_self_to_page -portal_id $portal_id -package_id $package_id + invoices_offers_project_portlet::add_self_to_page -portal_id $portal_id -package_id $package_id + set admin_portal_id [dotlrn_community::get_admin_portal_id \ -community_id $community_id ] @@ -187,7 +189,12 @@ -package_id $package_id \ -param_action $param_action + invoices_offers_project_portlet::add_self_to_page \ + -portal_id $portal_id \ + -package_id $package_id \ + -param_action $param_action + } ad_proc -public dotlrn_invoices::remove_user_from_community { @@ -216,6 +223,10 @@ invoices_offers_portlet::add_self_to_page \ -portal_id $portal_id \ -package_id 0 + + invoices_offers_project_portlet::add_self_to_page \ + -portal_id $portal_id \ + -package_id 0 } @@ -241,7 +252,11 @@ -portal_id $portal_id \ -package_id [ns_set get $args "package_id"] + invoices_offers_project_portlet::remove_self_from_page \ + -portal_id $portal_id \ + -package_id [ns_set get $args "package_id"] + } ad_proc -public dotlrn_invoices::clone { @@ -323,6 +338,17 @@ -package_id 0 } } + + 0.1d3 0.1d4 { + # We are going to add invoice portlet to the + # templates + + db_foreach get_portal_templates { } { + invoices_offers_project_portlet::add_self_to_page \ + -portal_id $portal_id \ + -package_id 0 + } + } } }