pro load_state, fname
@common_blocks.inc
  restore, fname[0], /verbose
  widget_control, TIME_LIST_WIDGET, set_value='Time: '+strcompress(string(times))
  widget_control, TIME_LIST_WIDGET, set_combobox_select=N_elements(times)-1
  widget_control, variable_list_widget, SET_VALUE=list_str
  widget_control, variable_list_widget, SET_DROPLIST_SELECT=var_index
  if (N_elements((*parti.names)) ne 0 && ptr_valid(parti)) then $
     widget_control, parti_listid, SET_value=(*parti.names)
;                 widget_control, parti.listid, SET_DROPLIST_SELECT=parti.index
  widget_control, base2, sensitive = 1
return
end