diff options
| -rw-r--r-- | lib/AdminPanel/Module/Proxy.pm | 47 | 
1 files changed, 31 insertions, 16 deletions
| diff --git a/lib/AdminPanel/Module/Proxy.pm b/lib/AdminPanel/Module/Proxy.pm index 98d3105b..c8011065 100644 --- a/lib/AdminPanel/Module/Proxy.pm +++ b/lib/AdminPanel/Module/Proxy.pm @@ -78,6 +78,21 @@ has 'sh_gui' => (          builder => '_SharedUGUIInitialize'  ); +has 'loc' => ( +        is => 'rw', +        init_arg => undef, +        builder => '_localeInitialize' +); + + +sub _localeInitialize { +    my $self = shift(); + +    # TODO fix domain binding for translation +    $self->loc(AdminPanel::Shared::Locales->new(domain_name => 'drakx-net') ); +    # TODO if we want to give the opportunity to test locally add dir_name => 'path' +} +  sub _SharedUGUIInitialize {      my $self = shift(); @@ -117,7 +132,7 @@ sub start {      if ($EUID != 0) {          $self->sh_gui->warningMsgBox({                                  title => $self->name, -                                text  => "root privileges required", +                                text  => $self->loc->N("root privileges required"),                                  });          return;      } @@ -128,7 +143,7 @@ sub start {  sub ask_for_X_restart {      my $self = shift; -    $self->sh_gui->warningMsgBox({title=>'X Restart Required',text=>'You need to log out and back in again for changes to take effect',richtext=>1}); +    $self->sh_gui->warningMsgBox({title=>$self->loc->N("X Restart Required"),text=>$self->loc->N("You need to log out and back in again for changes to take effect"),richtext=>1});  }  sub validate { @@ -139,17 +154,17 @@ sub validate {      # using commas rather than slashes       if($proxy->{http_proxy} !~ m,^($|http://),)      { -        $self->sh_gui->warningMsgBox({title=>'Error',text=>"Proxy should be http://...",richtext=>0}); +        $self->sh_gui->warningMsgBox({title=>'Error',text=>$self->loc->N("Proxy should be http://..."),richtext=>0});          $retval = 0;      }      if($proxy->{https_proxy} !~ m,^($|https?://),)      { -        $self->sh_gui->warningMsgBox({title=>'Error',text=>"Proxy should be http://... or https://...",richtext=>0}); +        $self->sh_gui->warningMsgBox({title=>'Error',text=>$self->loc->N("Proxy should be http://... or https://..."),richtext=>0});          $retval = 0;      }      if($proxy->{ftp_proxy} !~ m,^($|ftp://|http://),)      { -        $self->sh_gui->warningMsgBox({title=>'Error',text=>"URL should begin with 'ftp:' or 'http:'",richtext=>0}); +        $self->sh_gui->warningMsgBox({title=>'Error',text=>$self->loc->N("URL should begin with 'ftp:' or 'http:'"),richtext=>0});          $retval = 0;      }      return $retval; @@ -162,7 +177,7 @@ sub _manageProxyDialog {      my $appTitle = yui::YUI::app()->applicationTitle();      my $appIcon = yui::YUI::app()->applicationIcon();      ## set new title to get it in dialog -    my $newTitle = "Proxies configuration"; +    my $newTitle = $self->loc->N("Proxies configuration");      yui::YUI::app()->setApplicationTitle($newTitle);      my $factory  = yui::YUI::widgetFactory; @@ -200,7 +215,7 @@ sub _manageProxyDialog {      # app description      my $hbox_content = $factory->createHBox($layout); -    $factory->createLabel($hbox_content, "Here you can set up your proxies configuration (eg: http://my_caching_server:8080)"); +    $factory->createLabel($hbox_content, $self->loc->N("Here you can set up your proxies configuration (eg: http://my_caching_server:8080)"));      $hbox_content = $factory->createHBox($layout); @@ -208,31 +223,31 @@ sub _manageProxyDialog {      my $vbox_inputfields = $factory->createVBox($hbox_content);      # http proxy section -    my $httpproxy_label = $factory->createLabel($vbox_labels_flags, "HTTP proxy"); +    my $httpproxy_label = $factory->createLabel($vbox_labels_flags, $self->loc->N("HTTP proxy"));      my $http_proxy = $factory->createInputField($factory->createHBox($vbox_inputfields),"",0);      $http_proxy->setValue($proxy_curr_settings->{http_proxy}) if(defined($proxy_curr_settings->{http_proxy}));      $http_proxy->setWeight($yui::YD_HORIZ, 30);      # flag to setup the https proxy with the same value of the http proxy -    my $ckbHttpEqHttps = $factory->createCheckBox($vbox_labels_flags, "Use HTTP proxy for HTTPS connections",$httpsProxyEqualToHttpProxy); +    my $ckbHttpEqHttps = $factory->createCheckBox($vbox_labels_flags, $self->loc->N("Use HTTP proxy for HTTPS connections"),$httpsProxyEqualToHttpProxy);      $ckbHttpEqHttps->setNotify(1);      # add a spacing as we have       $factory->createLabel($factory->createHBox($vbox_inputfields)," ");      # https proxy -    $factory->createLabel($vbox_labels_flags, "HTTPS proxy"); +    $factory->createLabel($vbox_labels_flags, $self->loc->N("HTTPS proxy"));      my $https_proxy = $factory->createInputField($factory->createHBox($vbox_inputfields),"",0);      $https_proxy->setValue($proxy_curr_settings->{https_proxy}) if(defined($proxy_curr_settings->{https_proxy}));      $https_proxy->setWeight($yui::YD_HORIZ, 30);      # ftp proxy -    $factory->createLabel($vbox_labels_flags, "FTP proxy"); +    $factory->createLabel($vbox_labels_flags, $self->loc->N("FTP proxy"));      my $ftp_proxy = $factory->createInputField($factory->createHBox($vbox_inputfields),"",0);      $ftp_proxy->setValue($proxy_curr_settings->{ftp_proxy}) if(defined($proxy_curr_settings->{ftp_proxy}));      $ftp_proxy->setWeight($yui::YD_HORIZ, 30);      # no-proxy list -    $factory->createLabel($vbox_labels_flags, "No proxy for (comma separated list):"); +    $factory->createLabel($vbox_labels_flags, $self->loc->N("No proxy for (comma separated list):"));      my $no_proxy = $factory->createInputField($factory->createHBox($vbox_inputfields),"",0);      $no_proxy->setValue($proxy_curr_settings->{no_proxy}) if(defined($proxy_curr_settings->{no_proxy}));      $no_proxy->setWeight($yui::YD_HORIZ, 30); @@ -243,9 +258,9 @@ sub _manageProxyDialog {      my $hbox_foot = $factory->createHBox($layout);      my $vbox_foot_left = $factory->createVBox($factory->createLeft($hbox_foot));      my $vbox_foot_right = $factory->createVBox($factory->createRight($hbox_foot)); -    my $aboutButton = $factory->createPushButton($vbox_foot_left,"About"); -    my $cancelButton = $factory->createPushButton($vbox_foot_right,"Cancel"); -    my $okButton = $factory->createPushButton($vbox_foot_right,"OK"); +    my $aboutButton = $factory->createPushButton($vbox_foot_left,$self->loc->N("About")); +    my $cancelButton = $factory->createPushButton($vbox_foot_right,$self->loc->N("Cancel")); +    my $okButton = $factory->createPushButton($vbox_foot_right,$self->loc->N("OK"));      # main loop      while(1) { @@ -267,7 +282,7 @@ sub _manageProxyDialog {                      version => $VERSION,                      credits => "Copyright (c) 2013-2014 by Matteo Pasotti",                      license => "GPLv2", -                    description => "Graphical manager for proxies", +                    description => $self->loc->N("Graphical manager for proxies"),                      authors => "Matteo Pasotti <matteo.pasotti\@gmail.com>"                      }                  ); | 
