diff options
Diffstat (limited to 'nisautofs_wizard/Nisautofs.pm')
-rw-r--r-- | nisautofs_wizard/Nisautofs.pm | 27 |
1 files changed, 18 insertions, 9 deletions
diff --git a/nisautofs_wizard/Nisautofs.pm b/nisautofs_wizard/Nisautofs.pm index eb10d4ca..65f6dfca 100644 --- a/nisautofs_wizard/Nisautofs.pm +++ b/nisautofs_wizard/Nisautofs.pm @@ -71,23 +71,32 @@ $o->{pages} = { next => 'nis_server', }, nis_server => { - name => N("NIS server with autofs map") . "\n" . N("A NIS server is useful to create user, hostname database. The wizard builds autofs map, so it will provide the capabilities for NIS user to automount their home directory on a NIS client computer.") . "\n\n" . N("NIS server: name of your computer.") . "\n" . N("Home NIS: home base directory for users on NIS server. This directory will be exported through NFS server.") . "\n" . N("NIS domain: NIS domain to use (generally same as your DNS domain name)."), + name => N("NIS server with autofs map") . "\n" . N("A NIS server is useful to create user, hostname database. The wizard builds autofs map, so it will provide the capabilities for NIS user to automount their home directory on a NIS client computer.") . "\n\n" . N("NIS server: name of your computer.") . "\n" . N("NIS domain: NIS domain to use (generally same as your DNS domain name)."), data => [ { label => N("NIS server:"), val => $HOST }, - { label => N("Home NIS:"), val => \$o->{var}{HOMENIS} }, { label => N("NIS domainname:"), val => \$o->{var}{NISDOMAIN} }, - { text => N("Create home NIS directory if it doesn't exist"), type => 'bool', val => \$o->{var}{create_missing_directory} }, ], complete => sub { - if (!-d $o->{var}{HOMENIS} and $o->{var}{create_missing_directory}) { - mkdir_p($o->{var}{HOMENIS}); - } elsif (!-d $o->{var}{HOMENIS}) { - $::in->ask_warn(N("Warning"), N("Directory doesn't exist. Please create it manually.")); - return 0; } if ($o->{var}{NISDOMAIN} eq '(none)' || !$o->{var}{NISDOMAIN}) { return 'error_nisd' } }, - next => 'summaryserver', + next => 'nis_server2', }, + nis_server2 => { + name => N("Home NIS: home base directory for users on NIS server. This directory will be exported through NFS server."), + pre => sub { $o->{var}{wiz_} = $p->{}; }, + data => [ + { label => N("Home NIS:"), val => \$o->{var}{HOMENIS} }, + { text => N("Create home NIS directory if it doesn't exist"), type => 'bool', val => \$o->{var}{create_missing_directory} }, + ], + complete => sub { + if (!-d $o->{var}{HOMENIS} and $o->{var}{create_missing_directory}) { + mkdir_p($o->{var}{HOMENIS}); + } elsif (!-d $o->{var}{HOMENIS}) { + $::in->ask_warn(N("Warning"), N("Directory doesn't exist. Please create it manually.")); + return 0; } + }, + next => 'summaryserver', + }, summaryserver => { name => N("The wizard will set your NIS server with autofs map"), data => [ |