diff options
| author | Richard W.M. Jones <rjones@redhat.com> | 2011-07-15 14:47:09 +0100 |
|---|---|---|
| committer | Richard W.M. Jones <rjones@redhat.com> | 2011-07-15 14:47:09 +0100 |
| commit | f4dadd0fcfe41b9cc6fcd6097c4c3cf509d69879 (patch) | |
| tree | e99374817d85a716c438a15648a578ef3e4a80ab | |
| parent | 60dd9494f0890dcc6c9a1cce311edc92cb992290 (diff) | |
| download | libguestfs-f4dadd0fcfe41b9cc6fcd6097c4c3cf509d69879.tar.gz libguestfs-f4dadd0fcfe41b9cc6fcd6097c4c3cf509d69879.tar.xz libguestfs-f4dadd0fcfe41b9cc6fcd6097c4c3cf509d69879.zip | |
perl: Add binding for guestfs_user_cancel.
| -rw-r--r-- | generator/generator_perl.ml | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/generator/generator_perl.ml b/generator/generator_perl.ml index e2ec254b..f42bc879 100644 --- a/generator/generator_perl.ml +++ b/generator/generator_perl.ml @@ -277,6 +277,12 @@ PREINIT: OUTPUT: RETVAL +void +user_cancel (g) + guestfs_h *g; + PPCODE: + guestfs_user_cancel (g); + "; List.iter ( @@ -776,6 +782,11 @@ errnos: # mkdir failed because the directory exists already. } +=item $h->user_cancel (); + +Cancel current transfer. This is safe to call from Perl signal +handlers and threads. + =cut "; |