section config: allow base properties for {create, update}Schema()

This works the same way as e.g. get_standard_option does it.

Signed-off-by: Christoph Heiss <c.heiss@proxmox.com>
This commit is contained in:
Christoph Heiss 2023-08-10 14:37:06 +02:00 committed by Wolfgang Bumiller
parent 10de5bfc2a
commit 741bf653ae

View File

@ -52,13 +52,13 @@ sub plugindata {
}
sub createSchema {
my ($class, $skip_type) = @_;
my ($class, $skip_type, $base) = @_;
my $pdata = $class->private();
my $propertyList = $pdata->{propertyList};
my $plugins = $pdata->{plugins};
my $props = {};
my $props = $base || {};
my $copy_property = sub {
my ($src) = @_;
@ -107,13 +107,13 @@ sub createSchema {
}
sub updateSchema {
my ($class, $single_class) = @_;
my ($class, $single_class, $base) = @_;
my $pdata = $class->private();
my $propertyList = $pdata->{propertyList};
my $plugins = $pdata->{plugins};
my $props = {};
my $props = $base || {};
my $filter_type = $single_class ? $class->type() : undef;