Commit ed0a68b7 authored by Daniel P. Berrange's avatar Daniel P. Berrange

Fix example so it reads into original variable not a local copy!

parent ec988d04
...@@ -20,10 +20,9 @@ my $vol = $c->get_storage_volume_by_path($volpath); ...@@ -20,10 +20,9 @@ my $vol = $c->get_storage_volume_by_path($volpath);
open FILE, "<$f" or die "cannot open $f: $!"; open FILE, "<$f" or die "cannot open $f: $!";
sub foo { sub foo {
my $st = shift; my $st = $_[0];
my $data = shift; my $nbytes = $_[2];
my $nbytes = shift; return sysread FILE, $_[1], $nbytes;
return sysread FILE, $data, $nbytes;
}; };
eval { eval {
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment