diff --git a/Prima/Buttons.pm b/Prima/Buttons.pm index 601b19cc..7ef8a0f3 100644 --- a/Prima/Buttons.pm +++ b/Prima/Buttons.pm @@ -95,7 +95,7 @@ sub skin { return $_[0]->SUPER::skin unless $#_; my $self = shift; - $self->SUPER::skin($_[1]); + $self->SUPER::skin($_[0]); if ($self->SUPER::skin eq 'flat') { $self->update_shape if $self->autoShaping; } else {