diff options
author | Richard W.M. Jones <rjones@redhat.com> | 2009-06-24 18:25:09 +0100 |
---|---|---|
committer | Richard W.M. Jones <rjones@redhat.com> | 2009-06-24 18:25:09 +0100 |
commit | 0574eab8bc7d8e72db862ec36815835938a5fdf1 (patch) | |
tree | 6588315e33f95de9fbb150f862064471a975050e /perl/Guestfs.xs | |
parent | 8228eec99045ae720d8ef35851aa8c278f6b4e5c (diff) | |
download | libguestfs-0574eab8bc7d8e72db862ec36815835938a5fdf1.tar.gz libguestfs-0574eab8bc7d8e72db862ec36815835938a5fdf1.tar.xz libguestfs-0574eab8bc7d8e72db862ec36815835938a5fdf1.zip |
Generated code for 'mkdtemp' command.
Diffstat (limited to 'perl/Guestfs.xs')
-rw-r--r-- | perl/Guestfs.xs | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/perl/Guestfs.xs b/perl/Guestfs.xs index 4b059101..96b02f9b 100644 --- a/perl/Guestfs.xs +++ b/perl/Guestfs.xs @@ -2635,3 +2635,18 @@ PREINIT: if (r == -1) croak ("scrub_freespace: %s", guestfs_last_error (g)); +SV * +mkdtemp (g, template) + guestfs_h *g; + char *template; +PREINIT: + char *dir; + CODE: + dir = guestfs_mkdtemp (g, template); + if (dir == NULL) + croak ("mkdtemp: %s", guestfs_last_error (g)); + RETVAL = newSVpv (dir, 0); + free (dir); + OUTPUT: + RETVAL + |