| … | |
… | |
| 3769 | |
3769 | |
| 3770 | unless (ref $title) { |
3770 | unless (ref $title) { |
| 3771 | $title = new CFPlus::UI::Button |
3771 | $title = new CFPlus::UI::Button |
| 3772 | markup => $title, |
3772 | markup => $title, |
| 3773 | tooltip => $tooltip, |
3773 | tooltip => $tooltip, |
| 3774 | ); |
3774 | ; |
| 3775 | } |
3775 | } |
| 3776 | |
3776 | |
| 3777 | $title->connect (activate => sub { $self->set_current_page ($widget) }); |
3777 | $title->connect (activate => sub { $self->set_current_page ($widget) }); |
| 3778 | $self->{buttonbar}->add ($title); |
3778 | $self->{buttonbar}->add ($title); |
| 3779 | |
3779 | |
