diff options
| -rw-r--r-- | lib/ManaTools/Module/Firewall.pm | 17 | ||||
| -rwxr-xr-x | scripts/manawall | 11 |
2 files changed, 14 insertions, 14 deletions
diff --git a/lib/ManaTools/Module/Firewall.pm b/lib/ManaTools/Module/Firewall.pm index e534ca98..873fb44b 100644 --- a/lib/ManaTools/Module/Firewall.pm +++ b/lib/ManaTools/Module/Firewall.pm @@ -25,6 +25,7 @@ use autodie; use Moose; use Moose::Autobox; use utf8; +use File::ShareDir ':ALL'; use yui; use ManaTools::Shared qw(trim); @@ -47,20 +48,28 @@ use XML::Simple; extends qw( ManaTools::Module ); has '+icon' => ( - default => "/usr/share/icons/manawall.png", + default => File::ShareDir::dist_file(ManaTools::Shared::distName(), 'images/manawall.png'), ); has '+name' => ( - default => "Firewall Manager", + lazy => 1, + builder => '_nameInitializer', ); +sub _nameInitializer { + my $self = shift; + + return ($self->loc->N("manawall - Firewall Manager")); +} + + =head1 VERSION -Version 1.0.0 +Version 1.0.1 =cut -our $VERSION = '1.0.0'; +our $VERSION = '1.0.1'; has 'dialog' => ( is => 'rw', diff --git a/scripts/manawall b/scripts/manawall index ee0f727a..54f61cdc 100755 --- a/scripts/manawall +++ b/scripts/manawall @@ -23,16 +23,7 @@ use ManaTools::Module::Firewall; use yui; -my $wm_icon = "/usr/share/mcc/themes/default/firewall-mdk.png"; -my $wm_name = "Manage firewall rules"; - -yui::YUI::app()->setApplicationTitle($wm_name); -yui::YUI::app()->setApplicationIcon($wm_icon); - -my $hostMan = ManaTools::Module::Firewall->new({ - icon => $wm_icon, - name => $wm_name - }); +my $hostMan = ManaTools::Module::Firewall->new(); $hostMan->start(); 1; |