| … | |
… | |
| 108 | reference. The string will be used as button text and the code reference |
108 | reference. The string will be used as button text and the code reference |
| 109 | will be called when the toggle changes, with the new boolean value as |
109 | will be called when the toggle changes, with the new boolean value as |
| 110 | first argument. |
110 | first argument. |
| 111 | |
111 | |
| 112 | The following will add an entry C<myoption> that changes |
112 | The following will add an entry C<myoption> that changes |
| 113 | C<$self->{myoption}>: |
113 | C<< $self->{myoption} >>: |
| 114 | |
114 | |
| 115 | push @{ $self->{term}{option_popup_hook} }, sub { |
115 | push @{ $self->{term}{option_popup_hook} }, sub { |
| 116 | ("my option" => $myoption, sub { $self->{myoption} = $_[0] }) |
116 | ("my option" => $myoption, sub { $self->{myoption} = $_[0] }) |
| 117 | }; |
117 | }; |
| 118 | |
118 | |
