summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2013-12-20 23:15:56 +0100
committerThierry Vignaud <thierry.vignaud@gmail.com>2013-12-20 23:15:56 +0100
commitf76dc0931e47338aa9c7db257d28e5015d8a2f47 (patch)
treeb8987d95eb593c1160e38a2cd60f4a237ebdce36 /perl-install
parent9a6f9d11dec579bd605f5f167dbb6b2722c5ccf6 (diff)
downloaddrakx-f76dc0931e47338aa9c7db257d28e5015d8a2f47.tar
drakx-f76dc0931e47338aa9c7db257d28e5015d8a2f47.tar.gz
drakx-f76dc0931e47338aa9c7db257d28e5015d8a2f47.tar.bz2
drakx-f76dc0931e47338aa9c7db257d28e5015d8a2f47.tar.xz
drakx-f76dc0931e47338aa9c7db257d28e5015d8a2f47.zip
perl_checker cleanups
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/draksec6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/standalone/draksec b/perl-install/standalone/draksec
index 1626e7d74..7a265194a 100755
--- a/perl-install/standalone/draksec
+++ b/perl-install/standalone/draksec
@@ -117,7 +117,7 @@ my %auth = (
);
my $polkit_rules_file = "/etc/polkit-1/rules.d/51-draksec.rules";
-my %overrides = map { if ( /case '([^']+)': return polkit\.Result\.(YES|AUTH_ADMIN_KEEP|AUTH_SELF_KEEP)/ ) { ($1, $2) } } cat_($polkit_rules_file);
+my %overrides = map { if (/case '([^']+)': return polkit\.Result\.(YES|AUTH_ADMIN_KEEP|AUTH_SELF_KEEP)/) { ($1, $2) } } cat_($polkit_rules_file);
sub default_auth_value {
@@ -145,8 +145,8 @@ sub set_auth_value {
sub write_rules() {
my $contents = '';
keys %overrides;
- while(my($k, $v) = each %overrides) {
- $contents .= "case '$k': return polkit.Result.$v;\n" if ($k && $v);
+ while (my ($k, $v) = each %overrides) {
+ $contents .= "case '$k': return polkit.Result.$v;\n" if $k && $v;
}
if ($contents) {