From 3e7995bef00ad7b4381ed0f66eec8bdeb57382b1 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Wed, 8 Apr 2015 07:34:40 -0400
Subject: grub2: check there's still some place on /boot

---
 perl-install/bootloader.pm | 1 +
 1 file changed, 1 insertion(+)

(limited to 'perl-install/bootloader.pm')

diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index fd59addb2..531162103 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -1790,6 +1790,7 @@ sub write_grub2 {
     eval {
 	run_program::rooted($::prefix, 'grub2-set-default', '2>', \$error, $bootloader->{default}) or die "grub2-set-default failed: $error";
     };
+    check_enough_space();
 }
 
 sub write_grub {
-- 
cgit v1.2.1