Index: openacs-4/packages/dotlrn-ecommerce/www/admin/patrons.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/www/admin/patrons.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/dotlrn-ecommerce/www/admin/patrons.tcl 9 Jun 2005 05:54:39 -0000 1.4 +++ openacs-4/packages/dotlrn-ecommerce/www/admin/patrons.tcl 19 Jun 2005 06:05:07 -0000 1.5 @@ -1,9 +1,8 @@ # packages/dotlrn-ecommerce/www/admin/patrons.tcl ad_page_contract { + - - @author Roel Canicula (roelmc@pldtdsl.net) @creation-date 2005-05-28 @arch-tag: cfc996c0-7de4-40d1-88a3-f0eadf2a3fdc @@ -40,7 +39,7 @@ } } patron_p { - label "Patron for this Section" + label "Purchased this Section?" display_template { Yes @@ -111,10 +110,10 @@ } } -db_1row get_section_info "select c.course_id, s.section_name +db_1row get_section_info "select c.course_id, c.course_name, s.section_name from dotlrn_ecommerce_section s, dotlrn_catalogi c, cr_items ci where s.course_id = c.item_id and ci.live_revision=c.revision_id and s.section_id = :section_id" -set context [list [list [export_vars -base course-info { course_id }] $section_name] "Participants and Patrons"] +set context [list [list [export_vars -base course-info { course_id }] $course_name] [list "one-section?section_id=$section_id" "$section_name"] "Related Users"]