diff --git a/src/PVE/API2/Storage/Status.pm b/src/PVE/API2/Storage/Status.pm index 7875530..b2336e6 100644 --- a/src/PVE/API2/Storage/Status.pm +++ b/src/PVE/API2/Storage/Status.pm @@ -579,7 +579,8 @@ __PACKAGE__->register_method({ optional => 1, }, compression => { - description => "Decompress the downloaded file using specified compression algorithm", + description => + "Decompress the downloaded file using the specified compression algorithm.", type => 'string', enum => $PVE::Storage::Plugin::KNOWN_COMPRESSION_FORMATS, optional => 1, @@ -610,7 +611,7 @@ __PACKAGE__->register_method({ my $cfg = PVE::Storage::config(); - my ($node, $storage, $compression) = $param->@{'node', 'storage','compression'}; + my ($node, $storage, $compression) = $param->@{qw(node storage compression)}; my $scfg = PVE::Storage::storage_check_enabled($cfg, $storage, $node); die "can't upload to storage type '$scfg->{type}', not a file based storage!\n" @@ -658,7 +659,7 @@ __PACKAGE__->register_method({ if ($compression) { die "decompression not supported for $content\n" if $content ne 'iso'; my $info = PVE::Storage::decompressor_info('iso', $compression); - die "no decompression method found\n" if (! $info->{decompressor}); + die "no decompression method found\n" if !$info->{decompressor}; $opts->{decompression_command} = $info->{decompressor}; } PVE::Tools::download_file_from_url("$path/$filename", $url, $opts); diff --git a/src/PVE/Storage/Plugin.pm b/src/PVE/Storage/Plugin.pm index 71fcff0..0f0fde4 100644 --- a/src/PVE/Storage/Plugin.pm +++ b/src/PVE/Storage/Plugin.pm @@ -19,8 +19,8 @@ use JSON; use base qw(PVE::SectionConfig); -use constant KNOWN_COMPRESSION_FORMATS => ( 'gz', 'lzo', 'zst'); -use constant COMPRESSOR_RE => join( '|', KNOWN_COMPRESSION_FORMATS); +use constant KNOWN_COMPRESSION_FORMATS => ('gz', 'lzo', 'zst'); +use constant COMPRESSOR_RE => join('|', KNOWN_COMPRESSION_FORMATS); use constant LOG_EXT => ".log"; use constant NOTES_EXT => ".notes";