X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=perl%2Ft%2F060-readdir.t;h=dc8278b32946fa014d1db53bbc591823cc4d0d2d;hb=1214b321621e7750c67423ecf4d9528809e1eeac;hp=898b44f86a0da6b2fe3db5267e2c8acef2e85db9;hpb=8869adf1e811d894088dbb0f371edc23299005c8;p=libguestfs.git

diff --git a/perl/t/060-readdir.t b/perl/t/060-readdir.t
index 898b44f..dc8278b 100644
--- a/perl/t/060-readdir.t
+++ b/perl/t/060-readdir.t
@@ -34,11 +34,11 @@ ok (1);
 $h->launch ();
 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);