diff options
Diffstat (limited to 'lib')
-rw-r--r-- | lib/ManaTools/Module/Disk.pm | 36 |
1 files changed, 10 insertions, 26 deletions
diff --git a/lib/ManaTools/Module/Disk.pm b/lib/ManaTools/Module/Disk.pm index 95226583..a5228a64 100644 --- a/lib/ManaTools/Module/Disk.pm +++ b/lib/ManaTools/Module/Disk.pm @@ -73,10 +73,18 @@ use yui; extends qw( ManaTools::Module ); -has '+icon' => ( - default => File::ShareDir::dist_file(ManaTools::Shared::distName(), 'images/manadisk.png'), +has '+name' => ( + default => 'manadisk', + required => 0, + init_arg => undef, ); +override('_titleInitializer', sub { + my $self = shift; + + return $self->loc->N("%s - Storage partitioning & Mounts", $self->name()); +}); + has 'sh_gui' => ( is => 'rw', lazy => 1, @@ -188,30 +196,6 @@ our $VERSION = '1.0.1'; #============================================================= -=head2 BUILD - -=head3 INPUT - - $self: this object - -=head3 DESCRIPTION - - The BUILD method is called after a Moose object is created, - in this methods Services loads all the service information. - -=cut - -#============================================================= -sub BUILD { - my $self = shift; - - if (! $self->name) { - $self->name ($self->loc->N("Storage partitioning & Mounts")); - } -} - -#============================================================= - =head2 start =head3 INPUT |