2915c2924,2926 < sub{$self->clicked_on_assignment($self->{ASS_KEYS}->[$ass_lb->curselection()])} --- > # sub{$self->clicked_on_assignment($self->{ASS_KEYS}->[$ass_lb->curselection()])} > # ... used to work, but no longer does > sub{$self->clicked_on_assignment($self->{ASS_KEYS}->[$name_to_key{$ass_lb->get($ass_lb->curselection())}])}