From bfbd54060e10f0f2cdfa417643f6dedee8fe0984 Mon Sep 17 00:00:00 2001 From: Maarten Vanraes Date: Mon, 9 May 2016 09:44:15 +0200 Subject: Modules: provide title & icon using the new Module --- lib/ManaTools/Module/Proxy.pm | 13 +++++-------- 1 file changed, 5 insertions(+), 8 deletions(-) (limited to 'lib/ManaTools/Module/Proxy.pm') diff --git a/lib/ManaTools/Module/Proxy.pm b/lib/ManaTools/Module/Proxy.pm index fa3a8a3c..9869a197 100644 --- a/lib/ManaTools/Module/Proxy.pm +++ b/lib/ManaTools/Module/Proxy.pm @@ -41,19 +41,16 @@ use MDK::Common::System qw(getVarsFromSh); extends qw( ManaTools::Module ); -has '+icon' => ( - default => File::ShareDir::dist_file(ManaTools::Shared::distName(), 'images/manaproxy.png'), -); - has '+name' => ( - lazy => 1, - builder => '_nameInitializer', + default => 'manaproxy', + required => 0, + init_arg => undef, ); -sub _nameInitializer { +sub _titleInitializer { my $self = shift; - return ($self->loc->N("manaproxy - Proxy configuration")); + return ($self->loc->N("%s - Proxy configuration", $self->name())); }; has 'dialog' => ( -- cgit v1.2.1