From 053cb6bcaed204f91792b79bf70b9960a8e0a972 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 14 Sep 2004 08:56:24 +0000 Subject: - ensure {is_removable} field is there for created partitions, not only existing partitions - it breaks Create(), fixing --- perl-install/fs/mount_options.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/fs/mount_options.pm') diff --git a/perl-install/fs/mount_options.pm b/perl-install/fs/mount_options.pm index 1ce622721..c7baa4e7b 100644 --- a/perl-install/fs/mount_options.pm +++ b/perl-install/fs/mount_options.pm @@ -160,11 +160,11 @@ sub rationalize { sub set_default { my ($part, %opts) = @_; - #- opts are: useSupermount security iocharset codepage + #- opts are: useSupermount security iocharset codepage ignore_is_removable my ($options, $unknown) = &unpack($part); - if ($part->{is_removable} && !member($part->{mntpoint}, qw(/ /usr /var /boot))) { + if (!$opts{ignore_is_removable} && $part->{is_removable} && !member($part->{mntpoint}, qw(/ /usr /var /boot))) { $options->{supermount} = $opts{useSupermount} && !($opts{useSupermount} eq 'magicdev' && $part->{media_type} eq 'cdrom'); $part->{fs_type} = !$options->{supermount} ? 'auto' : $part->{media_type} eq 'cdrom' ? 'udf:iso9660' : 'ext2:vfat'; -- cgit v1.2.1