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

rbd: minor regex fixup

Browse Source
This commit is contained in:
Wolfgang Bumiller
2017-02-20 10:00:57 +01:00
parent 292a33fdd4
commit b2e430d30f
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
PVE/Storage/RBDPlugin.pm
View File

@ -186,7 +186,7 @@ sub rbd_ls {
if ($line =~ m/^((vm|base)-(\d+)-\S+)\s+(\d+)(k|M|G|T)\s((\S+)\/((vm|base)-\d+-\S+@\S+))?/) { if ($line =~ m/^((vm|base)-(\d+)-\S+)\s+(\d+)(k|M|G|T)\s((\S+)\/((vm|base)-\d+-\S+@\S+))?/) {
my ($image, $owner, $size, $unit, $parent) = ($1, $3, $4, $5, $8); my ($image, $owner, $size, $unit, $parent) = ($1, $3, $4, $5, $8);
next if $image =~ m/"@"/; #skip snapshots next if $image =~ /@/; #skip snapshots
$list->{$pool}->{$image} = { $list->{$pool}->{$image} = {
name => $image, name => $image,