$_->bind('', sub { $hlist->focus }) for $label, $button;