sub on_start {
my ($self) = @_;
+ $self->cmd_parse ("\x1b[?25l\x1b[?7l");
+ $self->refresh;
+
# might fail, but try anyways
$self->grab ($self->{data}{event}{time}, 1)
and $self->allow_events_async;
on_button_press $self, $self->{data}{event} if $self->{data}{event}{button};
- $self->cmd_parse ("\x1b[?25l\x1b[?7l");
- refresh $self;
-
()
}
type => "button",
text => " $text",
value => $value,
- render => sub { ($item->{value} ? "✔" : " ") . $text },
+ render => sub { ($item->{value} ? "* " : " ") . $text },
activate => sub { $cb->($item->{value} = !$item->{value}); },
};