Index: openacs-4/packages/dotlrn-ecommerce/lib/user-info.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/lib/user-info.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-ecommerce/lib/user-info.tcl 2 Jun 2005 06:39:41 -0000 1.1 +++ openacs-4/packages/dotlrn-ecommerce/lib/user-info.tcl 4 Jun 2005 10:05:17 -0000 1.2 @@ -148,8 +148,8 @@ {html {size 10}} } - {add:text(submit) {label "Update Participant"}} - {addpatron:text(submit) {label "Update Participant and Select Patron"}} + {add:text(submit) {label "Select Participant"}} + {addpatron:text(submit) {label "Select Participant and Select Patron"}} {cancel:text(submit) {label "Cancel"}} } -on_request { foreach var { authority_id first_names last_name email username screen_name url bio } { @@ -159,6 +159,7 @@ select * from person_info where person_id = :user_id + limit 1 } } -on_submit { set user_info(authority_id) $user(authority_id) @@ -203,6 +204,7 @@ select 1 from person_info where person_id = :user_id + limit 1 }] } { db_dml update_extra_info { update person_info