diff options
| -rwxr-xr-x | clock.pm | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -40,7 +40,7 @@ $vbox1->pack_start($calendar, 1, 1, 0); $calendar->signal_connect ( $_ => \&cal_changed ) foreach ('month-changed', 'day-selected', 'day-selected-double-click', 'prev-month', 'next-month', 'prev-year', 'next-year'); -my $button_time = new Gtk::Button "Time Zone"; +my $button_time = new Gtk::Button _("Time Zone"); $vbox1->pack_start($button_time, 0, 1, 10); $button_time->signal_connect ( clicked => sub { $in->{timezone}={}; @@ -89,7 +89,7 @@ $spinner_s->signal_connect ( button_release_event => \&spinned ); my $bbox = new Gtk::HButtonBox; $bbox->set_layout(-end); $vbox->pack_start($bbox, 0, 0, 5); -my $button_ok = new Gtk::Button "OK"; +my $button_ok = new Gtk::Button _("OK"); $button_ok->signal_connect ( clicked => sub { my ($year, $month, $day) = $calendar->get_date; $month++; @@ -105,8 +105,8 @@ $button_ok->signal_connect ( clicked => sub { quit_global(); }); $bbox->add($button_ok ); -my $button_cancel = new Gtk::Button "Cancel"; -my $button_reset = new Gtk::Button "Reset"; +my $button_cancel = new Gtk::Button _("Cancel"); +my $button_reset = new Gtk::Button _("Reset"); $button_cancel->signal_connect ( clicked => sub { quit_global(); Gtk->timeout_remove($timer); |