diff options
| author | Richard Jones <rjones@redhat.com> | 2009-04-30 23:10:22 +0100 |
|---|---|---|
| committer | Richard Jones <rjones@redhat.com> | 2009-04-30 23:10:22 +0100 |
| commit | e118c14b9552de311cbc1734e03a3226b484c1e8 (patch) | |
| tree | 6e7952088d10df67004db83bfe2f370e2e4ffba2 /perl | |
| parent | b55bf8158f0b7f6b1760b7b3b5f7c1274a149127 (diff) | |
| download | libguestfs-e118c14b9552de311cbc1734e03a3226b484c1e8.tar.gz libguestfs-e118c14b9552de311cbc1734e03a3226b484c1e8.tar.xz libguestfs-e118c14b9552de311cbc1734e03a3226b484c1e8.zip | |
Generated code for grub-install command.
Diffstat (limited to 'perl')
| -rw-r--r-- | perl/Guestfs.xs | 12 | ||||
| -rw-r--r-- | perl/lib/Sys/Guestfs.pm | 5 |
2 files changed, 17 insertions, 0 deletions
diff --git a/perl/Guestfs.xs b/perl/Guestfs.xs index 651e7a23..f19b9d09 100644 --- a/perl/Guestfs.xs +++ b/perl/Guestfs.xs @@ -1599,3 +1599,15 @@ PREINIT: if (r == -1) croak ("zero: %s", guestfs_last_error (g)); +void +grub_install (g, root, device) + guestfs_h *g; + char *root; + char *device; +PREINIT: + int r; + PPCODE: + r = guestfs_grub_install (g, root, device); + if (r == -1) + croak ("grub_install: %s", guestfs_last_error (g)); + diff --git a/perl/lib/Sys/Guestfs.pm b/perl/lib/Sys/Guestfs.pm index bab78879..3f00394b 100644 --- a/perl/lib/Sys/Guestfs.pm +++ b/perl/lib/Sys/Guestfs.pm @@ -537,6 +537,11 @@ For more information on states, see L<guestfs(3)>. This returns the verbose messages flag. +=item $h->grub_install ($root, $device); + +This command installs GRUB (the Grand Unified Bootloader) on +C<device>, with the root directory being C<root>. + =item $busy = $h->is_busy (); This returns true iff this handle is busy processing a command |