Index: openacs-4/packages/dotlrn-ecommerce/lib/tree-chunk.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/lib/tree-chunk.tcl,v diff -u -r1.7 -r1.8 --- openacs-4/packages/dotlrn-ecommerce/lib/tree-chunk.tcl 4 Jul 2005 14:28:32 -0000 1.7 +++ openacs-4/packages/dotlrn-ecommerce/lib/tree-chunk.tcl 7 Jul 2005 00:35:32 -0000 1.8 @@ -302,9 +302,13 @@ actions { label "" display_template { - + [_ dotlrn-ecommerce.add_to_cart] + + + [_ dotlrn-ecommerce.register] + [_ dotlrn-ecommerce.edit] @@ -353,7 +357,14 @@ set section_edit_url [export_vars -base admin/section-add-edit { course_id section_id return_url }] set sections_url [export_vars -base sections { course_id }] - set shopping_cart_add_url [export_vars -base ecommerce/shopping-cart-add { user_id product_id }] + # HAM : check NoPayment parameter + # if we're not asking for payment, change shopping cart url + # to dotlrn-ecommerce/register + if { [parameter::get -package_id [ad_conn package_id] -parameter NoPayment -default 0] } { + set shopping_cart_add_url [export_vars -base register/ { community_id product_id}] + } else { + set shopping_cart_add_url [export_vars -base ecommerce/shopping-cart-add { user_id product_id }] + } set member_p [dotlrn_community::member_p $community_id $user_id] set pending_p [dotlrn_community::member_pending_p -community_id $community_id -user_id $user_id] @@ -431,5 +442,10 @@ } set prices \$$prices + + # HAM : if the NoPayment parameter is set to "1" don't show the + if { [parameter::get -package_id [ad_conn package_id] -parameter NoPayment -default 0] } { + set prices "" + } } } \ No newline at end of file