function[] = set_plot_subject(e)

plotwindow = e.handle;


subj_pop = findobj('Tag', 'subj_pop');
sess_pop = findobj('Tag', 'sess_pop');
trial_slider = findobj('Tag', 'trial_slider');
trial_edit = findobj('Tag', 'trial_edit');

sel=get(subj_pop, 'Value');

for s = 1:length(e.subjects(sel).sessions);
    if s > 1
        sess_pop_string = [sess_pop_string '|' e.subjects(sel).sessions(s).name];       
    else
        sess_pop_string = [e.subjects(sel).sessions(s).name];
    end
    sess_pop_vals = [sess_pop_vals s];
end
set(sess_pop, 'Value', 1);