whitespace cleanups

diff --git a/PVE/Storage.pm b/PVE/Storage.pm
index 4e15df8a5b8755c38d992313275c30b0f5dd1593..95e7976c0eaa1ed053a0ee64968290f59ebc6608 100755 (executable)
--- a/PVE/Storage.pm
+++ b/PVE/Storage.pm
@@ -146,7 +146,7 @@ sub volume_resize {
 
 sub volume_rollback_is_possible {
     my ($cfg, $volid, $snap) = @_;
-    
+
     my ($storeid, $volname) = parse_volume_id($volid, 1);
     if ($storeid) {
         my $scfg = storage_config($cfg, $storeid);
@@ -490,31 +490,33 @@ sub storage_migrate {
        } else {
            die "$errstr - target type '$tcfg->{type}' not implemented\n";
        }
+
     } elsif ($scfg->{type} eq 'zfspool') {
 
-       if($tcfg->{type} eq 'zfspool'){
+       if ($tcfg->{type} eq 'zfspool') {
 
-           die "$errstr - pool on target has not same name as source!"if $tcfg->{pool} ne $scfg->{pool};
+           die "$errstr - pool on target has not same name as source!"
+               if $tcfg->{pool} ne $scfg->{pool};
 
-           my ( undef, $volname) = parse_volname($cfg, $volid);
+           my (undef, $volname) = parse_volname($cfg, $volid);
 
            my $zfspath = "$scfg->{pool}\/$volname";
 
-           my $snap = "zfs snapshot $zfspath\@__migration__";
+           my $snap = "zfs snapshot $zfspath\@__migration__";
 
-           my $send = "zfs send -v $zfspath\@__migration__ \| ssh root\@$target_host zfs recv $zfspath";
+           my $send = "zfs send -v $zfspath\@__migration__ \| ssh root\@$target_host zfs recv $zfspath";
 
-           my $destroy_target = "ssh root\@$target_host zfs destroy $zfspath\@__migration__";
+           my $destroy_target = "ssh root\@$target_host zfs destroy $zfspath\@__migration__";
            run_command($snap);
-           eval{
+           eval{
                run_command($send);
            };
            my $err;
            if ($err = $@){
                run_command("zfs destroy $zfspath\@__migration__");
                die $err;
-           } 
-           run_command($destroy_target);
+           }
+           run_command($destroy_target);
 
        } else {
            die "$errstr - target type $tcfg->{type} is not valid\n";