[pmg-docs.git] / gen-pmg.conf.5-opts.pl

#!/usr/bin/perl

use lib '.';
use strict;
use warnings;
use PVE::RESTHandler;

use Data::Dumper;

use PMG::Config;

my $types = PMG::Config::Base->lookup_types;

foreach my $section (@$types) {
    my $plugin = PMG::Config::Base->lookup($section);
    my $schema = $plugin->updateSchema(1);
    my $properties = $schema->{properties};
    
    print ".Section '$section'\n\n";
    
    print PVE::RESTHandler::dump_properties($properties);
}
 
exit(0);
Commit	Line	Data
f872534d DM	1	#!/usr/bin/perl
	2
	3	use lib '.';
	4	use strict;
	5	use warnings;
	6	use PVE::RESTHandler;
	7
	8	use Data::Dumper;
	9
	10	use PMG::Config;
	11
	12	my $types = PMG::Config::Base->lookup_types;
	13
	14	foreach my $section (@$types) {
	15	my $plugin = PMG::Config::Base->lookup($section);
	16	my $schema = $plugin->updateSchema(1);
	17	my $properties = $schema->{properties};
	18
	19	print ".Section '$section'\n\n";
	20
	21	print PVE::RESTHandler::dump_properties($properties);
	22	}
	23
	24	exit(0);