summaryrefslogtreecommitdiffstats
path: root/perl/Guestfs.xs
diff options
context:
space:
mode:
Diffstat (limited to 'perl/Guestfs.xs')
-rw-r--r--perl/Guestfs.xs11
1 files changed, 11 insertions, 0 deletions
diff --git a/perl/Guestfs.xs b/perl/Guestfs.xs
index 0cc124ce..66eeb294 100644
--- a/perl/Guestfs.xs
+++ b/perl/Guestfs.xs
@@ -1936,3 +1936,14 @@ PREINIT:
}
free (names);
+void
+e2fsck_f (g, device)
+ guestfs_h *g;
+ char *device;
+PREINIT:
+ int r;
+ PPCODE:
+ r = guestfs_e2fsck_f (g, device);
+ if (r == -1)
+ croak ("e2fsck_f: %s", guestfs_last_error (g));
+