summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/drakperm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-01-16 13:29:19 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-01-16 13:29:19 +0000
commit2ff8d37f7c51c03e37638c37e030e060d2c34669 (patch)
treec72f5c3597f86bd98cde9765692820dc4af7b89e /perl-install/standalone/drakperm
parente78fb4780e2059e155ec011dbefe71dd665cf7be (diff)
downloaddrakx-backup-do-not-use-2ff8d37f7c51c03e37638c37e030e060d2c34669.tar
drakx-backup-do-not-use-2ff8d37f7c51c03e37638c37e030e060d2c34669.tar.gz
drakx-backup-do-not-use-2ff8d37f7c51c03e37638c37e030e060d2c34669.tar.bz2
drakx-backup-do-not-use-2ff8d37f7c51c03e37638c37e030e060d2c34669.tar.xz
drakx-backup-do-not-use-2ff8d37f7c51c03e37638c37e030e060d2c34669.zip
replace occurences of "$foo ? $foo : $bar" with "$foo || $bar"
Diffstat (limited to 'perl-install/standalone/drakperm')
-rwxr-xr-xperl-install/standalone/drakperm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/standalone/drakperm b/perl-install/standalone/drakperm
index f2b79be3e..8d33efd33 100755
--- a/perl-install/standalone/drakperm
+++ b/perl-install/standalone/drakperm
@@ -335,7 +335,7 @@ sub row_setting_dialog {
#$group = ($group_read->get_active ? 4 : 0)+($group_write->get_active ? 2 : 0)+($group_execute->get_active ? 1 : 0);
#$other = ($other_read->get_active ? 4 : 0)+($other_write->get_active ? 2 : 0)+($other_execute->get_active ? 1 : 0);
my $s = ($sticky->get_active ? 1 : 0) + ($suid->get_active ? 4 : 0) + ($gid->get_active ? 2 : 0);
- $Perm_list->set_text($row,3, ($s ? $s : '') . $user . $group . $other);
+ $Perm_list->set_text($row,3, ($s || '') . $user . $group . $other);
$dlg->destroy;
$modified++;
});