From c0a1795638e8af09f66b18f674883d99c854d0f8 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Fabian=20Gr=C3=BCnbichler?= Date: Wed, 8 Apr 2020 22:58:04 +0200 Subject: [PATCH] config: make full parser private sub MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit it's now only used within the public parse_volume interface Signed-off-by: Fabian Grünbichler --- src/PVE/LXC/Config.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/PVE/LXC/Config.pm b/src/PVE/LXC/Config.pm index e7fe99b..1aab6d4 100644 --- a/src/PVE/LXC/Config.pm +++ b/src/PVE/LXC/Config.pm @@ -1033,7 +1033,7 @@ sub json_config_properties { return $prop; } -sub __parse_ct_mountpoint_full { +my $parse_ct_mountpoint_full = sub { my ($class, $desc, $data, $noerr) = @_; $data //= ''; @@ -1070,11 +1070,11 @@ sub parse_volume { my ($class, $key, $volume_string, $noerr) = @_; if ($key eq 'rootfs') { - my $res = $class->__parse_ct_mountpoint_full($rootfs_desc, $volume_string, $noerr); + my $res = $parse_ct_mountpoint_full->($class, $rootfs_desc, $volume_string, $noerr); $res->{mp} = '/' if defined($res); return $res; } elsif ($key =~ m/^mp\d+$/ || $key =~ m/^unused\d+$/) { - return $class->__parse_ct_mountpoint_full($mp_desc, $volume_string, $noerr); + return $parse_ct_mountpoint_full->($class, $mp_desc, $volume_string, $noerr); } die "parse_volume - unknown type: $key\n"; -- 2.39.5