summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2005-07-01 06:54:52 +0000
committerPascal Rigaux <pixel@mandriva.com>2005-07-01 06:54:52 +0000
commit9faa22b3908b13cd0b26683b5781228a79e33cae (patch)
tree397dd14402e1512c7d15c9b24318f48f3079c29f /perl-install
parent8325ea4f5a95738dc5794b46e6a4782d503e552f (diff)
downloaddrakx-9faa22b3908b13cd0b26683b5781228a79e33cae.tar
drakx-9faa22b3908b13cd0b26683b5781228a79e33cae.tar.gz
drakx-9faa22b3908b13cd0b26683b5781228a79e33cae.tar.bz2
drakx-9faa22b3908b13cd0b26683b5781228a79e33cae.tar.xz
drakx-9faa22b3908b13cd0b26683b5781228a79e33cae.zip
new function is_dmraid()
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/fs/type.pm3
1 files changed, 3 insertions, 0 deletions
diff --git a/perl-install/fs/type.pm b/perl-install/fs/type.pm
index 1d036d7bb..d641c8945 100644
--- a/perl-install/fs/type.pm
+++ b/perl-install/fs/type.pm
@@ -344,6 +344,9 @@ sub isMounted { $_[0]{isMounted} }
sub isBusy { isMounted($_[0]) || isPartOfRAID($_[0]) || isPartOfLVM($_[0]) || isPartOfLoopback($_[0]) }
sub isSpecial { isRAID($_[0]) || isLVM($_[0]) || isLoopback($_[0]) || isUBD($_[0]) }
+#- not for partitions, but for hds:
+sub is_dmraid { $_[0]{bus} =~ /^dmraid_/ }
+
sub can_be_this_fs_type {
my ($part, $fs_type) = @_;
can_be_one_of_those_fs_types($part, $fs_type);