From 98ead67180582fd67d9277b843439c813ce295cc Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 24 Mar 2005 17:15:47 +0000 Subject: tag strings as being translatable --- perl-install/standalone/drakroam | 56 ++++++++++++++++++++-------------------- 1 file changed, 28 insertions(+), 28 deletions(-) (limited to 'perl-install/standalone') diff --git a/perl-install/standalone/drakroam b/perl-install/standalone/drakroam index 0cdaa51c4..0a4cccab7 100755 --- a/perl-install/standalone/drakroam +++ b/perl-install/standalone/drakroam @@ -164,71 +164,71 @@ my $SignalLabel = Gtk2::Label->new; my $w = ugtk2->new('Drakroam'); gtkadd(gtkset_border_width($w->{window}, 2), gtkpack_(Gtk2::VBox->new, - 0, gtkadd(gtkset_border_width(Gtk2::Frame->new("Status"), 2), + 0, gtkadd(gtkset_border_width(Gtk2::Frame->new(N("Status")), 2), gtkpack(Gtk2::VBox->new, create_packtable({ col_spacings => 5, row_spacings => 5, homogenous => 1 }, [ $NetLabel, $IpLabel, $GwLabel ], [ $ModeLabel, $WepLabel, $SignalLabel ], ), gtkpack(create_hbox(), - gtksignal_connect(Gtk2::Button->new("Disconnect"), clicked => sub { &Disconnect }), - gtksignal_connect(Gtk2::Button->new("Refresh"), clicked => sub { &UpdateStatus }) + gtksignal_connect(Gtk2::Button->new(N("Disconnect")), clicked => sub { &Disconnect }), + gtksignal_connect(Gtk2::Button->new(N("Refresh")), clicked => sub { &UpdateStatus }) ) ) ), - 0, gtkadd(gtkset_border_width(Gtk2::Frame->new("Roaming"), 2), + 0, gtkadd(gtkset_border_width(Gtk2::Frame->new(N("Roaming")), 2), gtkpack(create_hbox(), gtkpack(Gtk2::VBox->new, - my $RoamStatus = Gtk2::Label->new("Roaming: off"), + my $RoamStatus = Gtk2::Label->new(N("Roaming: %s", N("off"))), gtkpack(create_hbox(), - gtksignal_connect(Gtk2::Button->new("Start"), clicked => sub { &StartRoam }), - gtksignal_connect(Gtk2::Button->new("Stop"), clicked => sub { &StopRoam }) + gtksignal_connect(Gtk2::Button->new(N("Start")), clicked => sub { &StartRoam }), + gtksignal_connect(Gtk2::Button->new(N("Stop")), clicked => sub { &StopRoam }) ) ), gtkpack(Gtk2::VBox->new, - Gtk2::Label->new("Scan interval (sec): "), + Gtk2::Label->new(N("Scan interval (sec): ")), gtkpack(Gtk2::HBox->new, $ScanEntry, - gtksignal_connect(Gtk2::Button->new("Set"), clicked => sub { &SetInterval }) + gtksignal_connect(Gtk2::Button->new(N("Set")), clicked => sub { &SetInterval }) ) ) ) ), - 1, gtkadd(gtkset_border_width(Gtk2::Frame->new("Known Networks (Drag up/down or edit)"), 2), + 1, gtkadd(gtkset_border_width(Gtk2::Frame->new(N("Known Networks (Drag up/down or edit)")), 2), gtkpack_(Gtk2::VBox->new, 1, create_scrolled_window($KnownList), 0, gtkpack(create_hbox(), - gtksignal_connect(Gtk2::Button->new("Remove"), clicked => sub { + gtksignal_connect(Gtk2::Button->new(N("Remove")), clicked => sub { my ($selected) = $KnownList->get_selected_indices; &RemoveNet($selected); }), - gtksignal_connect(Gtk2::Button->new("Connect"), clicked => sub { + gtksignal_connect(Gtk2::Button->new(N("Connect")), clicked => sub { my ($selected) = $KnownList->get_selected_indices; &ConnectNow($selected); }), - gtksignal_connect(Gtk2::Button->new("Save"), clicked => sub { &WriteConfig }) + gtksignal_connect(Gtk2::Button->new(N("Save")), clicked => sub { &WriteConfig }) ) ) ), - 1, gtkadd(gtkset_border_width(Gtk2::Frame->new("Available Networks"), 2), + 1, gtkadd(gtkset_border_width(Gtk2::Frame->new(N("Available Networks")), 2), gtkpack_(Gtk2::VBox->new, 1, create_scrolled_window($AvailableList), 0, gtkpack(create_hbox(), - gtksignal_connect(Gtk2::Button->new("Add"), clicked => sub { + gtksignal_connect(Gtk2::Button->new(N("Add")), clicked => sub { my @selected = $AvailableList->get_selected_indices; my ($mode, $channel, $key); my $essid = $AvailableList->{data}["@selected"][0]; my $dhcp = 1; # assume dhcp for new networks &AddNet($essid, $mode, $channel, $dhcp, $key); }), - gtksignal_connect(Gtk2::Button->new("Rescan"), clicked => sub { &UpdateAvailable }) + gtksignal_connect(Gtk2::Button->new(N("Rescan")), clicked => sub { &UpdateAvailable }) ) ) ), 0, gtkpack(create_hbox(), - gtksignal_connect(Gtk2::Button->new("Help"), clicked => sub { &Dialog($HelpFile) }), - gtksignal_connect(Gtk2::Button->new("About"), clicked => sub { &Dialog($AboutFile) }), - gtksignal_connect(Gtk2::Button->new("Save and close"), clicked => sub { + gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => sub { &Dialog($HelpFile) }), + gtksignal_connect(Gtk2::Button->new(N("About")), clicked => sub { &Dialog($AboutFile) }), + gtksignal_connect(Gtk2::Button->new(N("Save and close")), clicked => sub { &WriteConfig; Gtk2->main_quit; }) @@ -252,8 +252,8 @@ sub isRoamingRunning() { } sub UpdateRoaming() { - my $status = isRoamingRunning() ? "on" : "off"; - $RoamStatus->set_text("Roaming: $status"); + my $status = isRoamingRunning() ? N("on") : N("off"); + $RoamStatus->set_text(N("Roaming: %s", $status)); return FALSE; #- do not update again if launched on timeout } @@ -278,12 +278,12 @@ sub UpdateStatus() { if (/default\s*(\S*)\s/) { $CurrentGW = $1 } else { $CurrentGW = "---.---.---.---" } } - $NetLabel->set_text("Net: $CurrentNet"); - $ModeLabel->set_text("Mode: $CurrentMode"); - $IpLabel->set_text("IP: $CurrentIP"); - $WepLabel->set_text("Encryption: $CurrentWEP"); - $GwLabel->set_text("Gateway: $CurrentGW"); - $SignalLabel->set_text("Signal: $CurrentSignal"); + $NetLabel->set_text(N("Network: %s", $CurrentNet)); + $ModeLabel->set_text(N("Mode: %s", $CurrentMode)); + $IpLabel->set_text(N("IP: %s", $CurrentIP)); + $WepLabel->set_text(N("Encryption: %s", $CurrentWEP)); + $GwLabel->set_text(N("Gateway: %s", $CurrentGW)); + $SignalLabel->set_text(N("Signal: %s", $CurrentSignal)); } sub UpdateAvailable() { @@ -384,7 +384,7 @@ sub Dialog { my ($FilePointer) = @_; my $content = join('', cat_($FilePointer)); # dump into a dialog - my $AboutWindow = Gtk2::Dialog->new("Drakroam Info", $w->{real_window}, + my $AboutWindow = Gtk2::Dialog->new(N("Information"), $w->{real_window}, 'destroy-with-parent', N("Ok") => 'none'); $AboutWindow->vbox->add(create_scrolled_window(Gtk2::Label->new($content))); -- cgit v1.2.1