_ >   239 239     set mailbox_list [ad_get_client_property -default "" webmail mailbox_list]
  240 240     if { [empty_string_p $mailbox_list] } {
  241 241         if { [empty_string_p $user_id] } {
< >   242               set user_id [ad_verify_and_get_user_id]
    242             set user_id [ad_conn user_id]
< _   243 243         }
  244 244         set mailbox_list [db_list_of_lists wm_mailbox_name_ids {
  245 245             SELECT mailbox_id, name FROM wm_mailboxes