diff options
| author | Antoine Ginies <aginies@mandriva.com> | 2004-07-30 03:05:27 +0000 |
|---|---|---|
| committer | Antoine Ginies <aginies@mandriva.com> | 2004-07-30 03:05:27 +0000 |
| commit | cd4f6d058a0df6ed2049424397336bcda8fd7529 (patch) | |
| tree | 0a6b968bedbee7c54ebd36a97039e743ece9c2bb | |
| parent | 1acd2892cb4fb5c15801fd49a1cf0640b05b7b97 (diff) | |
| download | drakwizard-cd4f6d058a0df6ed2049424397336bcda8fd7529.tar drakwizard-cd4f6d058a0df6ed2049424397336bcda8fd7529.tar.gz drakwizard-cd4f6d058a0df6ed2049424397336bcda8fd7529.tar.bz2 drakwizard-cd4f6d058a0df6ed2049424397336bcda8fd7529.tar.xz drakwizard-cd4f6d058a0df6ed2049424397336bcda8fd7529.zip | |
Wizard remember all my settings (thx Robert Vojta patch)
| -rwxr-xr-x | samba_wizard/Samba.pm | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/samba_wizard/Samba.pm b/samba_wizard/Samba.pm index c70c7bef..99613c57 100755 --- a/samba_wizard/Samba.pm +++ b/samba_wizard/Samba.pm @@ -35,12 +35,12 @@ my $o = { var => { wiz_box_list => '', wiz_hosts_allow => '', - wiz_do_file_sharing => '', + wiz_do_file_sharing => get_file_sharing(), wiz_all_printers => '', wiz_level => '', + wiz_do_printer_sharing => 1, + wiz_do_homes => get_home_sharing(), wiz_printers => '', - wiz_do_printer_sharing => '', - wiz_do_homes => '', wiz_workgroup => '', wiz_dir => '', wiz_banner => '', @@ -117,10 +117,10 @@ $o->{pages} = { }, ask_netmask => { name => N("Access control") . "\n\n" . N("* Example 1: allow all IP in 150.203.*.*; except one\nhosts allow = 150.203. EXCEPT 150.203.6.66") . "\n\n" . N("* Example 2: allow hosts that match the given network/netmask\nhosts allow = 150.203.15.0/255.255.255.0") . "\n\n" . N("* Example 3: allow a couple of hosts\nhosts allow = lapland, arvidsjaur") . "\n\n" . N("* Example 4: allow only hosts in NIS netgroup \"foonet\", but deny access from one particular host\nhosts allow = \@foonet\nhosts deny = pirate") . "\n\n" . N("Note that access still requires suitable user-level passwords."), - pre => sub { - $o->{var}{wiz_hosts_allow} ||= get_allow_host(); - $o->{var}{wiz_hosts_deny} ||= get_deny_host() - }, +# pre => sub { +# $o->{var}{wiz_hosts_allow} ||= get_allow_host(); +# $o->{var}{wiz_hosts_deny} ||= get_deny_host() +# }, post => \&check, data => [ { label => N("Allow hosts:"), val => \$o->{var}{wiz_hosts_allow} }, |