Tickit::Widget::CheckButton - a widget allowing a toggle true/false option


 use Tickit;
 use Tickit::Widget::CheckButton;
 use Tickit::Widget::VBox;

 my $vbox = Tickit::Widget::VBox->new;
 $vbox->add( Tickit::Widget::CheckButton->new(
       label => "Check button $_",
 ) ) for 1 .. 5;

 Tickit->new( root => $vbox )->run;


This class provides a widget which allows a true/false selection. It displays a clickable indication of status and a caption. Clicking on the status or caption inverts the status of the widget.

This widget is part of an experiment in evolving the design of the Tickit::Style widget integration code, and such is subject to change of details.


The default style pen is used as the widget pen. The following style pen prefixes are also used:

check => PEN

The pen used to render the check marker

The following style keys are used:

check => STRING

The text used to indicate the active status

spacing => INT

Number of columns of spacing between the check mark and the caption text

The following style tags are used:


Set when this button's status is true

The following style actions are used:


The main action to activate the on_click handler.


$checkbutton = Tickit::Widget::CheckButton->new( %args )

Constructs a new Tickit::Widget::CheckButton object.

Takes the following named argmuents

label => STRING

The label text to display alongside this button.

on_toggle => CODE

Optional. Callback function to invoke when the check state is changed.


$label = $checkbutton->label

$checkbutton->set_label( $label )

Returns or sets the label text of the button.

$on_toggle = $checkbutton->on_toggle

$checkbutton->set_on_toggle( $on_toggle )

Return or set the CODE reference to be called when the button state is changed.

 $on_toggle->( $checkbutton, $active )



Sets this button's active state to true.


Sets this button's active state to false.

$active = $checkbutton->is_active

Returns this button's active state.


Paul Evans <>