From cd4f6d058a0df6ed2049424397336bcda8fd7529 Mon Sep 17 00:00:00 2001 From: Antoine Ginies Date: Fri, 30 Jul 2004 03:05:27 +0000 Subject: Wizard remember all my settings (thx Robert Vojta patch) --- samba_wizard/Samba.pm | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) (limited to 'samba_wizard/Samba.pm') 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} }, -- cgit v1.2.1