proxmox-mirrors/pve-common
1
0
Fork 0
mirror of https://git.proxmox.com/git/pve-common synced 2025-04-28 15:57:11 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

cli handler: contain no-stricture scope

Browse Source 
to please perlcritic's highest severity level and as it makes just
sense to contain such things to the smallest possible scope.

Signed-off-by: Thomas Lamprecht <t.lamprecht@proxmox.com>
This commit is contained in:
Thomas Lamprecht 2023-04-11 15:09:20 +02:00
parent 646a36efce
commit 016d20715b
1 changed files with 9 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
src/PVE/CLIHandler.pm
View File

@ -538,11 +538,12 @@ sub generate_asciidoc_synopsis {
$exename = &$get_exe_name($class);
no strict 'refs';
my $def = ${"${class}::cmddef"};
$cmddef = $def;
{
no strict 'refs'; ## no critic (ProhibitNoStrict)
$cmddef = ${"${class}::cmddef"};
}
if (ref($def) eq 'ARRAY') {
if (ref($cmddef) eq 'ARRAY') {
print_simple_asciidoc_synopsis();
} else {
$cmddef->{help} = [ __PACKAGE__, 'help', ['cmd'] ];
@ -660,8 +661,10 @@ sub run_cli_handler {
my $logid = $ENV{PVE_LOG_ID} || $exename;
initlog($logid);
no strict 'refs';
$cmddef = ${"${class}::cmddef"};
{
no strict 'refs'; ## no critic (ProhibitNoStrict)
$cmddef = ${"${class}::cmddef"};
}
if (ref($cmddef) eq 'ARRAY') {
$handle_simple_cmd->(\@ARGV, $preparefunc, $param_cb);