summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/drakperm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/standalone/drakperm b/perl-install/standalone/drakperm
index 3dab291d2..17d0240fa 100755
--- a/perl-install/standalone/drakperm
+++ b/perl-install/standalone/drakperm
@@ -200,7 +200,7 @@ sub save_perm {
}
#- on list selection we get all data concerning the current selection
sub row_setting_data {
- my (undef, $row, $column, undef ) = @_;
+ my (undef, $row, $column) = @_;
%CURENT = ('clicked' => {'row' => $row,
'col' => $column
},
@@ -371,7 +371,7 @@ sub get_user_or_group {
my $what = @_;
my @users;
local *F;
- open F, $what eq 'users' ? '/etc/passwd': '/etc/group';
+ open F, $what eq 'users' ? '/etc/passwd' : '/etc/group';
local $_;
while (<F>) {