From c3f114b71ee06f5f359566e46c190eebc1d895c0 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Mon, 15 Jul 2013 23:29:13 +0000
Subject: adapt to latest btrfs utils for resizing

---
 perl-install/diskdrake/interactive.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/diskdrake')

diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm
index 011d61422..212d98b7a 100644
--- a/perl-install/diskdrake/interactive.pm
+++ b/perl-install/diskdrake/interactive.pm
@@ -893,7 +893,7 @@ filesystem checks will be run on your next boot into Microsoft Windows®"));
 	    mkdir_p($dir);
 	    fs::mount::mount(devices::make($part->{device}), $dir, $part->{fs_type});
 	}
-	if (!run_program::run("btrfsctl", "-r", $part->{size}*512, $dir)) {
+	if (!run_program::run(qw(btrfs filesystem resize), $part->{size}*512, $dir)) {
 	    $nice_resize{btrfs} = undef;
 	    if (!$part->{isMounted}) {
 		fs::mount::umount($dir);
-- 
cgit v1.2.1