-command => sub { print_button_label( $button ) },