… | … | ||
---|---|---|---|
1043 | 1043 | ||
1044 | my $item; $item = { | 1044 | my $item; $item = { |
1045 | type => "button", | 1045 | type => "button", |
1046 | text => " $text", | 1046 | text => " $text", |
1047 | value => $value, | 1047 | value => $value, |
1048 | render => sub { ($item->{value} ? "✔" : " ") . $text }, | 1048 | render => sub { ($item->{value} ? "* " : " ") . $text }, |
1049 | activate => sub { $cb->($item->{value} = !$item->{value}); }, | 1049 | activate => sub { $cb->($item->{value} = !$item->{value}); }, |
1050 | }; | 1050 | }; |
1051 | 1051 | ||
1052 | $self->add_item ($item); | 1052 | $self->add_item ($item); |
1053 | } | 1053 | } |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |