diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2017-01-07 14:44:11 +0100 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2017-01-07 14:44:11 +0100 |
commit | 07d75cb4cec18e85ef21a819d5c3dcbc4e269b8d (patch) | |
tree | 2d05cfb761ca8f9b18ddde7d8ef07c6c825ffcf5 /perl-install/fsedit.pm | |
parent | b3479e1896a7ce646c12f4c2db526356c030bc1f (diff) | |
download | drakx-07d75cb4cec18e85ef21a819d5c3dcbc4e269b8d.tar drakx-07d75cb4cec18e85ef21a819d5c3dcbc4e269b8d.tar.gz drakx-07d75cb4cec18e85ef21a819d5c3dcbc4e269b8d.tar.bz2 drakx-07d75cb4cec18e85ef21a819d5c3dcbc4e269b8d.tar.xz drakx-07d75cb4cec18e85ef21a819d5c3dcbc4e269b8d.zip |
fix exception when clearing all partitions
it happens on !UEFI (mga#20083)
Diffstat (limited to 'perl-install/fsedit.pm')
-rw-r--r-- | perl-install/fsedit.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/fsedit.pm b/perl-install/fsedit.pm index a013cc679..114039baf 100644 --- a/perl-install/fsedit.pm +++ b/perl-install/fsedit.pm @@ -51,6 +51,7 @@ sub init_mntpnt_suggestions { my $mntpoint; # only suggests /boot/EFI if there's not already one: + require fs::any; if (is_uefi()) { if (!any { isESP($_) } @$fstab) { $mntpoint = { mntpoint => "/boot/EFI", size => MB(100), pt_type => 0xef, ratio => 1, maxsize => MB(300) }; |