summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-08-19 21:27:31 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-08-19 21:27:31 +0000
commit94f942f169827a79ef3a2345bc41955e56c70e11 (patch)
tree39c24e148c69e43daca87d230742859e90ed073d /perl-install
parentbcc4607d0b19cd7f9abf7027f44356fe86de267d (diff)
downloaddrakx-94f942f169827a79ef3a2345bc41955e56c70e11.tar
drakx-94f942f169827a79ef3a2345bc41955e56c70e11.tar.gz
drakx-94f942f169827a79ef3a2345bc41955e56c70e11.tar.bz2
drakx-94f942f169827a79ef3a2345bc41955e56c70e11.tar.xz
drakx-94f942f169827a79ef3a2345bc41955e56c70e11.zip
remove isSupermount (was unused)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/partition_table.pm5
1 files changed, 2 insertions, 3 deletions
diff --git a/perl-install/partition_table.pm b/perl-install/partition_table.pm
index 2e7388b9a..efdd7da4a 100644
--- a/perl-install/partition_table.pm
+++ b/perl-install/partition_table.pm
@@ -6,7 +6,7 @@ package partition_table; # $Id$
@ISA = qw(Exporter);
%EXPORT_TAGS = (
- types => [ qw(type2name type2fs name2type fs2type isExtended isExt2 isThisFs isTrueFS isSwap isDos isWin isFat isSunOS isOtherAvailableFS isPrimary isNfs isSupermount isRawLVM isRawRAID isRAID isLVM isNT isMountableRW isNonMountable isPartOfLVM isPartOfRAID isPartOfLoopback isApplePartMap isLoopback isMounted isBusy isSpecial maybeFormatted isApple isAppleBootstrap) ],
+ types => [ qw(type2name type2fs name2type fs2type isExtended isExt2 isThisFs isTrueFS isSwap isDos isWin isFat isSunOS isOtherAvailableFS isPrimary isNfs isRawLVM isRawRAID isRAID isLVM isNT isMountableRW isNonMountable isPartOfLVM isPartOfRAID isPartOfLoopback isApplePartMap isLoopback isMounted isBusy isSpecial maybeFormatted isApple isAppleBootstrap) ],
);
@EXPORT_OK = map { @$_ } values %EXPORT_TAGS;
@@ -226,9 +226,8 @@ sub isDos { arch() !~ /^sparc/ && $ {{ 1=>1, 4=>1, 6=>1 }}{$_[0]{type}} }
sub isWin { $ {{ 0xb=>1, 0xc=>1, 0xe=>1, 0x1b=>1, 0x1c=>1, 0x1e=>1 }}{$_[0]{type}} }
sub isFat { isDos($_[0]) || isWin($_[0]) }
sub isSunOS { arch() =~ /sparc/ && $ {{ 0x1=>1, 0x2=>1, 0x4=>1, 0x6=>1, 0x7=>1, 0x8=>1 }}{$_[0]{type}} }
-sub isNfs { $_[0]{type} eq 'nfs' } #- small hack
+sub isNfs { $_[0]{type} eq 'nfs' }
sub isNT { arch() !~ /^sparc/ && $_[0]{type} == 0x7 }
-sub isSupermount { $_[0]{type} eq 'supermount' }
sub isApple { type2fs($_[0]) eq 'apple' && defined $_[0]{isDriver} }
sub isAppleBootstrap { type2fs($_[0]) eq 'apple' && defined $_[0]{isBoot} }
sub isHiddenMacPart { defined $_[0]{isMap} }