Fix perlcritic

This commit is contained in:
Ilia Ross
2026-05-23 02:24:03 +02:00
parent b9766d97a6
commit eb779294fd
18 changed files with 18 additions and 18 deletions

View File

@@ -1,7 +1,7 @@
use strict;
use warnings;
require 'kea-dhcp-lib.pl';
require 'kea-dhcp-lib.pl'; ## no critic
# backup_config_files()
# Returns files that can be backed up.

View File

@@ -3,7 +3,7 @@
use strict;
use warnings;
require './kea-dhcp-lib.pl';
require './kea-dhcp-lib.pl'; ## no critic
&ReadParse();
our (%in, %text);
&error_setup($text{'eacl_aviol'});

View File

@@ -3,7 +3,7 @@
use strict;
use warnings;
require './kea-dhcp-lib.pl';
require './kea-dhcp-lib.pl'; ## no critic
&ReadParse();
our (%in, %text);
&error_setup($text{'eacl_aviol'});

View File

@@ -3,7 +3,7 @@
use strict;
use warnings;
require './kea-dhcp-lib.pl';
require './kea-dhcp-lib.pl'; ## no critic
&ReadParse();
our (%in, %text);
&error_setup($text{'eacl_aviol'});

View File

@@ -3,7 +3,7 @@
use strict;
use warnings;
require './kea-dhcp-lib.pl';
require './kea-dhcp-lib.pl'; ## no critic
&ReadParse();
our (%in, %text);
&error_setup($text{'eacl_aviol'});

View File

@@ -3,7 +3,7 @@
use strict;
use warnings;
require './kea-dhcp-lib.pl';
require './kea-dhcp-lib.pl'; ## no critic
&ReadParse();
our (%in, %text);
&error_setup($text{'eacl_aviol'});

View File

@@ -3,7 +3,7 @@
use strict;
use warnings;
require './kea-dhcp-lib.pl';
require './kea-dhcp-lib.pl'; ## no critic
&ReadParse();
our (%in, %text);
&error_setup($text{'eacl_aviol'});

View File

@@ -3,7 +3,7 @@
use strict;
use warnings;
require './kea-dhcp-lib.pl';
require './kea-dhcp-lib.pl'; ## no critic
&ReadParse();
our (%in, %text);
our $module_name;

View File

@@ -1,7 +1,7 @@
# kea-dhcp-lib.pl
# Helpers for the ISC Kea DHCP Webmin module.
BEGIN { push(@INC, ".."); };
BEGIN { push(@INC, ".."); }; ## no critic
use strict;
use warnings;
use WebminCore;

View File

@@ -3,7 +3,7 @@
use strict;
use warnings;
require './kea-dhcp-lib.pl';
require './kea-dhcp-lib.pl'; ## no critic
our %text;
&error_setup($text{'eacl_aviol'});
&kea_assert_acl('apply');

View File

@@ -3,7 +3,7 @@
use strict;
use warnings;
require './kea-dhcp-lib.pl';
require './kea-dhcp-lib.pl'; ## no critic
&ReadParse();
our (%in, %text);
&error_setup($text{'eacl_aviol'});

View File

@@ -3,7 +3,7 @@
use strict;
use warnings;
require './kea-dhcp-lib.pl';
require './kea-dhcp-lib.pl'; ## no critic
&ReadParse();
our (%in, %text);
&error_setup($text{'eacl_aviol'});

View File

@@ -3,7 +3,7 @@
use strict;
use warnings;
require './kea-dhcp-lib.pl';
require './kea-dhcp-lib.pl'; ## no critic
&ReadParse();
our (%in, %text);
&error_setup($text{'eacl_aviol'});

View File

@@ -3,7 +3,7 @@
use strict;
use warnings;
require './kea-dhcp-lib.pl';
require './kea-dhcp-lib.pl'; ## no critic
&ReadParse();
our (%in, %text);
&error_setup($text{'eacl_aviol'});

View File

@@ -3,7 +3,7 @@
use strict;
use warnings;
require './kea-dhcp-lib.pl';
require './kea-dhcp-lib.pl'; ## no critic
&ReadParse();
our (%in, %text);
&error_setup($text{'eacl_aviol'});

View File

@@ -3,7 +3,7 @@
use strict;
use warnings;
require './kea-dhcp-lib.pl';
require './kea-dhcp-lib.pl'; ## no critic
&ReadParseMime();
our (%in, %text);
&error_setup($text{'eacl_aviol'});

View File

@@ -3,7 +3,7 @@
use strict;
use warnings;
require './kea-dhcp-lib.pl';
require './kea-dhcp-lib.pl'; ## no critic
our %text;
&error_setup($text{'eacl_aviol'});
&kea_assert_acl('apply');

View File

@@ -3,7 +3,7 @@
use strict;
use warnings;
require './kea-dhcp-lib.pl';
require './kea-dhcp-lib.pl'; ## no critic
our %text;
&error_setup($text{'eacl_aviol'});
&kea_assert_acl('apply');