summaryrefslogtreecommitdiffstats
path: root/perl-install/fs/type.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/fs/type.pm')
-rw-r--r--perl-install/fs/type.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/fs/type.pm b/perl-install/fs/type.pm
index 244c7126d..80176f15a 100644
--- a/perl-install/fs/type.pm
+++ b/perl-install/fs/type.pm
@@ -10,7 +10,7 @@ use devices;
our @ISA = qw(Exporter);
our @EXPORT = qw(
isEmpty isExtended isTrueLocalFS isTrueFS isDos isSwap isOtherAvailableFS isRawLVM isRawRAID isRAID isLVM isMountableRW isNonMountable isPartOfLVM isPartOfRAID isPartOfLoopback isLoopback isMounted isBusy isSpecial isApple isAppleBootstrap isWholedisk isFat_or_NTFS isRecovery
- maybeFormatted set_isFormatted
+ maybeFormatted set_isFormatted defaultFS
);
@@ -309,6 +309,8 @@ sub type_subpart_from_magic {
$p;
}
+sub defaultFS { 'ext4' }
+
sub true_local_fs_types() { qw(ext3 ext2 ext4 reiserfs reiser4 xfs jfs) }
sub isEmpty { !$_[0]{fs_type} && $_[0]{pt_type} == 0 }