diff options
| -rw-r--r-- | perl-install/services.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/services.pm b/perl-install/services.pm index 46ced1279..701ce07c1 100644 --- a/perl-install/services.pm +++ b/perl-install/services.pm @@ -219,7 +219,7 @@ sub ask_standalone_gtk { my ($started, $action) = $update_service->($service, gtkset_justify($l, 0)); [ gtkpack__(new Gtk::HBox(0,0), $_), gtkpack__(new Gtk::HBox(0,0), $l), - gtkpack__(new Gtk::HBox(0,0), gtksignal_connect(new Gtk::Button("Infos"), clicked => sub { $display->($infos) })), + gtkpack__(new Gtk::HBox(0,0), gtksignal_connect(new Gtk::Button(_("Infos")), clicked => sub { $display->($infos) })), gtkpack__(new Gtk::HBox(0,0), gtkset_active(gtksignal_connect( new Gtk::CheckButton(_("On boot")), clicked => sub { if ($_[0]->active) { @@ -233,7 +233,7 @@ sub ask_standalone_gtk { ($started, $action) = $update_service->($service, $l); $display->($_); } - )) } ("Start", "Stop") + )) } (_("Start"), _("Stop")) ] } @$l)), 500, 400), |