diff options
| author | Antoine Ginies <aginies@mandriva.com> | 2004-01-21 16:28:06 +0000 |
|---|---|---|
| committer | Antoine Ginies <aginies@mandriva.com> | 2004-01-21 16:28:06 +0000 |
| commit | 1379898533cc08b5a50c32444ff446a731bcd0d1 (patch) | |
| tree | 0713f261fd9dcc8cfc6bd077fe820bac7ee8bb0b /nisautofs_wizard | |
| parent | 333f23dcb783fe5b121eb9bd82634d4939b34864 (diff) | |
| download | drakwizard-1379898533cc08b5a50c32444ff446a731bcd0d1.tar drakwizard-1379898533cc08b5a50c32444ff446a731bcd0d1.tar.gz drakwizard-1379898533cc08b5a50c32444ff446a731bcd0d1.tar.bz2 drakwizard-1379898533cc08b5a50c32444ff446a731bcd0d1.tar.xz drakwizard-1379898533cc08b5a50c32444ff446a731bcd0d1.zip | |
perl_cehcker recommendation
Diffstat (limited to 'nisautofs_wizard')
| -rw-r--r-- | nisautofs_wizard/Nisautofs.pm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/nisautofs_wizard/Nisautofs.pm b/nisautofs_wizard/Nisautofs.pm index 0396d4bc..a696e362 100644 --- a/nisautofs_wizard/Nisautofs.pm +++ b/nisautofs_wizard/Nisautofs.pm @@ -60,7 +60,7 @@ my $o = { defaultimage => "/usr/share/wizards/dns_wizard/images/NIS.png", init => sub { if (member($NISDOMAIN, qw(localdomain (none)))) { - return (0, N("You need to readjust your NIS domainname. For a NIS server you need a correct NIS domainname, not egal to localdomain or none. Add NISDOMAIN=your_nis_domain in /etc/sysconfig/network file, and do a: nisdomainname your_nis_domain.")) + return 0, N("You need to readjust your NIS domainname. For a NIS server you need a correct NIS domainname, not egal to localdomain or none. Add NISDOMAIN=your_nis_domain in /etc/sysconfig/network file, and do a: nisdomainname your_nis_domain.") } 1 }, @@ -75,7 +75,7 @@ $o->{pages} = { welcome => { name => N("NIS server with autofs map") . "\n\n" . N("Setup a Nis server with autofs map, auto.home and auto.master files.") . "\n\n" . N("Client can automatically mount their home directory when they log on a NIS client computer network."), no_back => 1, - pre => sub { $o->{var}{wiz_level} ||= 1; }, + pre => sub { $o->{var}{wiz_level} ||= 1 }, post => sub { if ($o->{var}{wiz_level} == 2) { return 'nis_client' } @@ -110,7 +110,7 @@ $o->{pages} = { { label => N("Home NIS:"), fixed_val => \$o->{var}{HOMENIS} }, { label => N("NIS domainname:"), fixed_val => \$o->{var}{NISDOMAIN} }, { label => N("Nis directory:"), fixed_val => \$o->{var}{NIS_DIRMAKEFILE} }, - { label => N("Network File:"), fixed_val => \$o->{var}{NETWORKFILE}}, + { label => N("Network File:"), fixed_val => \$o->{var}{NETWORKFILE} }, { label => N("Nfs exports:"), fixed_val => \$o->{var}{NFSEXPORTS} }, { label => N("Auto master:"), fixed_val => \$o->{var}{AUTOMASTER} }, { label => N("Auto home:"), fixed_val => \$o->{var}{AUTOHOME} }, @@ -154,7 +154,7 @@ $o->{pages} = { sub test_set { - if (member($o->{var}{NISDOMAIN}, qw(localdomain (none)))) { return 'error_nisd'; } + if (member($o->{var}{NISDOMAIN}, qw(localdomain (none)))) { return 'error_nisd' } !-d $o->{var}{HOMENIS} or return 'error_dir'; !-d $o->{var}{NIS_DIRMAKEFILE} or return 'error_dir'; } @@ -234,7 +234,7 @@ sub get_nis_users { my @unwanted = qw(install maui nobody mpi); my @users; open(PASS, "ypcat passwd|") || die " cant exec ypcat passwd!"; - while(<PASS>) { + while (<PASS>) { my ($login) = split(':'); if (!member($login, @unwanted)) { push(@users, $login); @@ -263,7 +263,7 @@ EOF } sub test_autofile { - map { if (-e $_) { rm_rf($_) } ; $_} $AUTOHOME, $AUTOMASTER; + map { if (-e $_) { rm_rf($_) }; $_ } $AUTOHOME, $AUTOMASTER; } sub save_config { |