'-command' => sub{BUTTON1() && $main->destroy();},