]>
Commit | Line | Data |
---|---|---|
7b2c36ae DM |
1 | #!/usr/bin/perl |
2 | ||
9344ee0d | 3 | use lib '.'; |
7b2c36ae DM |
4 | use strict; |
5 | use warnings; | |
6 | use PVE::RESTHandler; | |
7 | use PVE::QemuServer; | |
8 | ||
9 | my $prop = PVE::QemuServer::json_config_properties(); | |
10 | ||
0ebf1114 DM |
11 | # cdrom is just an alias, so we do not want to print details |
12 | delete $prop->{cdrom}->{format}; | |
13 | ||
7b2c36ae | 14 | print PVE::RESTHandler::dump_properties($prop); |