mirror of
https://git.proxmox.com/git/pve-common
synced 2025-04-30 18:27:46 +00:00
cli handler: contain no-stricture scope
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:
parent
646a36efce
commit
016d20715b
@ -538,11 +538,12 @@ sub generate_asciidoc_synopsis {
|
|||||||
|
|
||||||
$exename = &$get_exe_name($class);
|
$exename = &$get_exe_name($class);
|
||||||
|
|
||||||
no strict 'refs';
|
{
|
||||||
my $def = ${"${class}::cmddef"};
|
no strict 'refs'; ## no critic (ProhibitNoStrict)
|
||||||
$cmddef = $def;
|
$cmddef = ${"${class}::cmddef"};
|
||||||
|
}
|
||||||
|
|
||||||
if (ref($def) eq 'ARRAY') {
|
if (ref($cmddef) eq 'ARRAY') {
|
||||||
print_simple_asciidoc_synopsis();
|
print_simple_asciidoc_synopsis();
|
||||||
} else {
|
} else {
|
||||||
$cmddef->{help} = [ __PACKAGE__, 'help', ['cmd'] ];
|
$cmddef->{help} = [ __PACKAGE__, 'help', ['cmd'] ];
|
||||||
@ -660,8 +661,10 @@ sub run_cli_handler {
|
|||||||
my $logid = $ENV{PVE_LOG_ID} || $exename;
|
my $logid = $ENV{PVE_LOG_ID} || $exename;
|
||||||
initlog($logid);
|
initlog($logid);
|
||||||
|
|
||||||
no strict 'refs';
|
{
|
||||||
$cmddef = ${"${class}::cmddef"};
|
no strict 'refs'; ## no critic (ProhibitNoStrict)
|
||||||
|
$cmddef = ${"${class}::cmddef"};
|
||||||
|
}
|
||||||
|
|
||||||
if (ref($cmddef) eq 'ARRAY') {
|
if (ref($cmddef) eq 'ARRAY') {
|
||||||
$handle_simple_cmd->(\@ARGV, $preparefunc, $param_cb);
|
$handle_simple_cmd->(\@ARGV, $preparefunc, $param_cb);
|
||||||
|
Loading…
Reference in New Issue
Block a user