Forum OpenACS Q&A: Re: Unable to login after upgrade to OpenACS 5.1

 # this is a direct update to the SC tables, we should expect a new
 # API for handling updates on SC, but since there's no one yet,
 # we'll do this way now .... (roc)

 set sc_change [list {auth_authentication.Authenticate.InputType} {auth_password.ChangePassword.InputType} {auth_password.ResetPassword.InputType}]
 set element_msg_type_name integer

 foreach msg_type_name $sc_change {
  set msg_type_id [db_string get_msg_type_id { select msg_type_id from acs_sc_msg_types where msg_type_name = :msg_type_name }]
  set element_pos [db_string get_pos { select max(element_pos) from acs_sc_msg_type_elements where msg_type_id = :msg_type_id }]
  incr element_pos
 
  acs_sc::msg_type::element::new \
   -msg_type_name $msg_type_name \
   -element_name authority_id \
   -element_msg_type_name $element_msg_type_name \
   -element_msg_type_isset_p f \
   -element_pos $element_pos
        
 }