From cfd58f1fcca8ebd6a61bb2a0e775f2196b815335 Mon Sep 17 00:00:00 2001
From: Dietmar Maurer <dietmar@proxmox.com>
Date: Wed, 14 Sep 2016 11:31:10 +0200
Subject: [PATCH] code cleanup

---
 PVE/Storage/RBDPlugin.pm | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/PVE/Storage/RBDPlugin.pm b/PVE/Storage/RBDPlugin.pm
index 3391df2..a965ade 100644
--- a/PVE/Storage/RBDPlugin.pm
+++ b/PVE/Storage/RBDPlugin.pm
@@ -491,8 +491,11 @@ sub list_images {
     if (my $dat = $cache->{rbd}->{$pool}) {
 	foreach my $image (keys %$dat) {
 
-	    my $volname = $dat->{$image}->{name};
-	    my $parent = $dat->{$image}->{parent};
+	    my $info = $dat->{$image};
+
+	    my $volname = $info->{name};
+	    my $parent = $info->{parent};
+	    my $owner = $info->{vmid};
 
 	    if ($parent && $parent =~ m/^(base-\d+-\S+)\@__base__$/) {
 		$volname = "$1/$volname";
@@ -500,7 +503,6 @@ sub list_images {
 
 	    my $volid = "$storeid:$volname";
 
-	    my $owner = $dat->{$image}->{vmid};
 	    if ($vollist) {
 		my $found = grep { $_ eq $volid } @$vollist;
 		next if !$found;
@@ -508,7 +510,6 @@ sub list_images {
 		next if defined ($vmid) && ($owner ne $vmid);
 	    }
 
-	    my $info = $dat->{$image};
 	    $info->{volid} = $volid;
 	    $info->{format} = 'raw';