git.annexia.org
/
libguestfs.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
generator: Optional arguments, add-drive-opts (RHBZ#642934,CVE-2010-3851).
[libguestfs.git]
/
perl
/
examples
/
lvs.pl
diff --git
a/perl/examples/lvs.pl
b/perl/examples/lvs.pl
index
1a84017
..
1755c89
100755
(executable)
--- a/
perl/examples/lvs.pl
+++ b/
perl/examples/lvs.pl
@@
-10,7
+10,7
@@
die "Usage: lvs.pl guest.img\n" if @ARGV != 1 || ! -f $ARGV[0];
print "Creating the libguestfs handle\n";
my $h = Sys::Guestfs->new ();
-$h->add_drive
($ARGV[0]
);
+$h->add_drive
_opts ($ARGV[0], format => "raw"
);
print "Launching, this can take a few seconds\n";
$h->launch ();