From 47193590cbe2f3c1de7bac211464d525a87218f7 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 19 Aug 2003 19:20:27 +0000 Subject: perl_checker compliance --- perl-install/standalone/drakperm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'perl-install/standalone/drakperm') diff --git a/perl-install/standalone/drakperm b/perl-install/standalone/drakperm index 0347cc9ce..aa7c3e28b 100755 --- a/perl-install/standalone/drakperm +++ b/perl-install/standalone/drakperm @@ -16,7 +16,8 @@ local $_ = join '', @ARGV; my ($default_perm_level) = "level ".chomp_(`cat /etc/sysconfig/msec | grep SECURE_LEVEL= |cut -d= -f2`); my $perm_path = '/usr/share/msec/'; my $local_path = '/etc/security/msec/'; -my %perm = ( 'level 1' => $perm_path.'perm.1', +my %perm = ( + 'level 1' => $perm_path.'perm.1', 'level 2' => $perm_path.'perm.2', 'level 3' => $perm_path.'perm.3', 'level 4' => $perm_path.'perm.4', @@ -367,7 +368,7 @@ sub row_setting_dialog { $vbox; } keys %rights), gtkpack(Gtk2::VBox->new(0,5), - Gtk2::Label->new (' '), + Gtk2::Label->new(' '), $suid, $gid, $sticky, -- cgit v1.2.1