rbd: use correct key to access hash elements
This commit is contained in:
committed by
Dietmar Maurer
parent
fa1ed7a341
commit
5e6aa346c7
@ -495,7 +495,7 @@ sub list_images {
|
|||||||
|
|
||||||
my $volid = "$storeid:$volname";
|
my $volid = "$storeid:$volname";
|
||||||
|
|
||||||
my $owner = $dat->{$volname}->{vmid};
|
my $owner = $dat->{$image}->{vmid};
|
||||||
if ($vollist) {
|
if ($vollist) {
|
||||||
my $found = grep { $_ eq $volid } @$vollist;
|
my $found = grep { $_ eq $volid } @$vollist;
|
||||||
next if !$found;
|
next if !$found;
|
||||||
@ -503,7 +503,7 @@ sub list_images {
|
|||||||
next if defined ($vmid) && ($owner ne $vmid);
|
next if defined ($vmid) && ($owner ne $vmid);
|
||||||
}
|
}
|
||||||
|
|
||||||
my $info = $dat->{$volname};
|
my $info = $dat->{$image};
|
||||||
$info->{volid} = $volid;
|
$info->{volid} = $volid;
|
||||||
$info->{format} = 'raw';
|
$info->{format} = 'raw';
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user