aboutsummaryrefslogtreecommitdiffstats
path: root/lib/ManaTools/Shared/disk_backend
diff options
context:
space:
mode:
Diffstat (limited to 'lib/ManaTools/Shared/disk_backend')
-rw-r--r--lib/ManaTools/Shared/disk_backend/FileSystem.pm8
-rw-r--r--lib/ManaTools/Shared/disk_backend/Plugin/Btrfs.pm6
-rw-r--r--lib/ManaTools/Shared/disk_backend/Plugin/Extfs.pm8
3 files changed, 17 insertions, 5 deletions
diff --git a/lib/ManaTools/Shared/disk_backend/FileSystem.pm b/lib/ManaTools/Shared/disk_backend/FileSystem.pm
index 3799686f..fec1847a 100644
--- a/lib/ManaTools/Shared/disk_backend/FileSystem.pm
+++ b/lib/ManaTools/Shared/disk_backend/FileSystem.pm
@@ -61,9 +61,11 @@ use Moose::Role;
has 'fstypes' => (
is => 'ro',
- isa => 'ArrayRef[Str]',
+ isa => 'HashRef[Str]',
init_arg => undef,
- default => sub { return []; },
+ default => sub {
+ return {};
+ },
);
#=============================================================
@@ -91,7 +93,7 @@ sub has_type {
my $self = shift;
my $type = shift;
my $fstypes = $self->fstypes();
- for my $t (@{$fstypes}) {
+ for my $t (keys %{$fstypes}) {
if ($t eq $type) {
return 1;
}
diff --git a/lib/ManaTools/Shared/disk_backend/Plugin/Btrfs.pm b/lib/ManaTools/Shared/disk_backend/Plugin/Btrfs.pm
index a7acdd6d..4c7cb707 100644
--- a/lib/ManaTools/Shared/disk_backend/Plugin/Btrfs.pm
+++ b/lib/ManaTools/Shared/disk_backend/Plugin/Btrfs.pm
@@ -60,7 +60,11 @@ extends 'ManaTools::Shared::disk_backend::Plugin';
with 'ManaTools::Shared::disk_backend::FileSystem';
has '+fstypes' => (
- default => sub { return ['btrfs'] },
+ default => sub {
+ return {
+ 'btrfs' => 'Btrfs',
+ };
+ },
);
has '+dependencies' => (
diff --git a/lib/ManaTools/Shared/disk_backend/Plugin/Extfs.pm b/lib/ManaTools/Shared/disk_backend/Plugin/Extfs.pm
index e7b4d9ed..4dc6de27 100644
--- a/lib/ManaTools/Shared/disk_backend/Plugin/Extfs.pm
+++ b/lib/ManaTools/Shared/disk_backend/Plugin/Extfs.pm
@@ -60,7 +60,13 @@ extends 'ManaTools::Shared::disk_backend::Plugin';
with 'ManaTools::Shared::disk_backend::FileSystem';
has '+fstypes' => (
- default => sub { return ['ext2', 'ext3', 'ext4']; },
+ default => sub {
+ return {
+ 'ext2' => 'Extfs',
+ 'ext3' => 'Extfs',
+ 'ext4' => 'Extfs'
+ };
+ },
);
has '+dependencies' => (