yesBad/pve-storage
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

drbd: avoid warning about undefined value

Browse Source
This commit is contained in:
Dietmar Maurer
2015-05-18 14:15:35 +02:00
parent 47dbb901c3
commit 69a093c7fd
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
PVE/Storage/DRBDPlugin.pm
View File

@ -157,14 +157,14 @@ sub alloc_image {
die "unsupported format '$fmt'" if $fmt ne 'raw'; die "unsupported format '$fmt'" if $fmt ne 'raw';
die "illegal name '$name' - should be 'vm-$vmid-*'\n" die "illegal name '$name' - should be 'vm-$vmid-*'\n"
if $name && $name !~ m/^vm-$vmid-/; if defined($name) && $name !~ m/^vm-$vmid-/;
my $hdl = connect_drbdmanage_service(); my $hdl = connect_drbdmanage_service();
my $volumes = drbd_list_volumes($hdl); my $volumes = drbd_list_volumes($hdl);
die "volume '$name' already exists\n" if $volumes->{$name}; die "volume '$name' already exists\n" if defined($name) && $volumes->{$name};
if (!$name) { if (!defined($name)) {
for (my $i = 1; $i < 100; $i++) { for (my $i = 1; $i < 100; $i++) {
my $tn = "vm-$vmid-disk-$i"; my $tn = "vm-$vmid-disk-$i";
if (!defined ($volumes->{$tn})) { if (!defined ($volumes->{$tn})) {
@ -175,7 +175,7 @@ sub alloc_image {
} }
die "unable to allocate an image name for VM $vmid in storage '$storeid'\n" die "unable to allocate an image name for VM $vmid in storage '$storeid'\n"
if !$name; if !defined($name);
my ($rc, $res) = $hdl->create_resource($name, {}); my ($rc, $res) = $hdl->create_resource($name, {});
check_drbd_rc($rc->[0]); check_drbd_rc($rc->[0]);