Re^3: How can I call a class method of the object's parent class?

Just in case somebody with the same problem finds this thread, here is the method function I added to Popupmenu.pm to solve the problem:

sub set()
{
    my $this = shift;
    my $id = shift;
    $this->{-values}->[$this->{-selected}] = $id;
}
[download]

Comment on Re^3: How can I call a class method of the object's parent class? Download Code