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.61 -r1.62 --- openacs-4/packages/dotlrn-ecommerce/lib/tree-chunk.tcl 22 Jan 2006 20:10:25 -0000 1.61 +++ openacs-4/packages/dotlrn-ecommerce/lib/tree-chunk.tcl 22 Jan 2006 21:00:52 -0000 1.62 @@ -404,7 +404,8 @@ - [_ dotlrn-ecommerce.edit] + [_ dotlrn-ecommerce.edit] + [_ dotlrn-ecommerce.show][_ dotlrn-ecommerce.hide] [_ dotlrn-ecommerce.application_pending] @@ -496,7 +497,7 @@ set discount_clause "" } -db_multirow -extend {patron_message member_state fs_chunk section_folder_id section_pages_url category_name community_url course_edit_url section_add_url section_edit_url course_grades section_grades section_zones sections_url member_p sessions instructor_names price prices shopping_cart_add_url attendees available_slots pending_p waiting_p approved_p instructor_p registration_approved_url button waiting_list_number asm_url } course_list get_courses { } { +db_multirow -extend {toggle_display_url patron_message member_state fs_chunk section_folder_id section_pages_url category_name community_url course_edit_url section_add_url section_edit_url course_grades section_grades section_zones sections_url member_p sessions instructor_names price prices shopping_cart_add_url attendees available_slots pending_p waiting_p approved_p instructor_p registration_approved_url button waiting_list_number asm_url } course_list get_courses { } { # Since dotlrn-ecommerce is based on dotlrn-catalog, # it's possible to have a dotlrn_catalog object without an @@ -507,7 +508,7 @@ } set button [_ dotlrn-ecommerce.add_to_cart] - + set toggle_display_url [export_vars -base admin/toggle-display {section_id {return_url [ad_return_url]}}] set category_name [string range $category_name 0 [expr [string length $category_name] - 3]] set community_url [dotlrn_community::get_community_url $community_id] set return_url [ad_return_url] Index: openacs-4/packages/dotlrn-ecommerce/www/admin/toggle-display.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/www/admin/toggle-display.tcl,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/dotlrn-ecommerce/www/admin/toggle-display.tcl 22 Jan 2006 21:00:52 -0000 1.1 @@ -0,0 +1,10 @@ +ad_page_contract { + Toggle display_section_p +} { + section_id:integer,notnull + {return_url ".."} +} + +db_dml toggle_display "" + +ad_returnredirect $return_url Index: openacs-4/packages/dotlrn-ecommerce/www/admin/toggle-display.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/www/admin/toggle-display.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/dotlrn-ecommerce/www/admin/toggle-display.xql 22 Jan 2006 21:00:52 -0000 1.1 @@ -0,0 +1,9 @@ + + + + + + update ec_custom_product_field_values set display_section_p = not display_section_p where product_id = (select product_id from dotlrn_ecommerce_section where section_id=:section_id) + + +