use strict;
use warnings;
-use Test::More tests => 13;
+use Test::More tests => 12;
use Sys::Guestfs;
$h->launch ();
ok (1);
-$h->wait_ready ();
-ok (1);
-$h->sfdisk ("/dev/sda", 0, 0, 0, [","]);
+$h->part_disk ("/dev/sda", "mbr");
ok (1);
$h->mkfs ("ext2", "/dev/sda1");
ok (1);
-$h->mount ("/dev/sda1", "/");
+$h->mount_options ("", "/dev/sda1", "/");
ok (1);
$h->mkdir ("/p");
ok (1);