From 5f55acfa92bdb9cad5bd76a45725d9c202033acb Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Tue, 24 Nov 2009 16:09:32 +0000 Subject: unmount swap too when unmounting all partitions --- perl-install/fs/mount.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/fs/mount.pm') diff --git a/perl-install/fs/mount.pm b/perl-install/fs/mount.pm index f7bea2ae4..59e3e8bbb 100644 --- a/perl-install/fs/mount.pm +++ b/perl-install/fs/mount.pm @@ -222,7 +222,7 @@ sub umount_all { log::l("unmounting all filesystems"); foreach (sort { $b->{mntpoint} cmp $a->{mntpoint} } - grep { $_->{mntpoint} && !$_->{real_mntpoint} } @$fstab) { + grep { $_->{mntpoint} && !$_->{real_mntpoint} || isSwap($_) } @$fstab) { umount_part($_); } } -- cgit v1.2.1