Index: openacs-4/packages/acs-subsite/lib/user-info.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/lib/user-info.tcl,v diff -u -N -r1.11.4.2 -r1.11.4.3 --- openacs-4/packages/acs-subsite/lib/user-info.tcl 22 Jul 2004 10:30:35 -0000 1.11.4.2 +++ openacs-4/packages/acs-subsite/lib/user-info.tcl 23 Jul 2004 09:08:18 -0000 1.11.4.3 @@ -108,16 +108,7 @@ ]] } -# Get info from eabis -set organization "" -set position "" -set institution_short_name "" -set responsibilities "" -set role "" - -db_0or1row get_eabis_info "select organization,position,institution_short_name,responsibilities,role from eabis_user_info where user_id = :user_id" - ad_form -extend -name user_info -form { {url:text,optional {label "[_ acs-subsite.Home_page]"} @@ -130,28 +121,6 @@ {mode $elm_mode(bio)} {display_value {[ad_text_to_html -- $user(bio)]}} } - {organization:text - {label "Organization"} - {html {size 50}} - } - {institution_short_name:text,optional - {label "Short Name"} - {html {size 30}} - } - {position:text - {label "Position"} - {html {size 50}} - } - {responsibilities:text,optional - {label "Responsibilities"} - {html {size 50}} - } - {role:text(select) - {label "Role"} - {options {{Academic academic} {Corporate corporate} {Student student} {Staff staff} {Other other}}} - } - - } -on_request { foreach var { authority_id first_names last_name email username screen_name url bio } { set $var $user($var) @@ -189,11 +158,6 @@ break } } - - if [catch {db_dml eabis_user_info_insert "insert into eabis_user_info (organization,position,institution_short_name,responsibilities,role,user_id) values (:organization,:position,:institution_short_name,:responsibilities,:role,:user_id)"}] { - db_dml eabis_user_info "update eabis_user_info set organization=:organization, position=:position, institution_short_name=:institution_short_name, responsibilities=:responsibilities, role=:role where user_id=:user_id" - } - } -after_submit { if { [string equal [ad_conn account_status] "closed"] } { auth::verify_account_status