diff options
Diffstat (limited to 'samba_wizard/Samba.pm')
| -rwxr-xr-x | samba_wizard/Samba.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/samba_wizard/Samba.pm b/samba_wizard/Samba.pm index a05a90a3..2407bf9a 100755 --- a/samba_wizard/Samba.pm +++ b/samba_wizard/Samba.pm @@ -348,6 +348,8 @@ sub ask_dir { # remember one variable cannot be commented and not in the same file. sub do_it { $::testing and return; + my $in = 'interactive'->vnew('su', 'Samba'); + my $w = $in->wait_message(N("Samba server"), N("Configuring your Samba server...")); # global section $samba->{global}{workgroup} = $o->{var}{wiz_workgroup}; $samba->{global}{'server string'} = $o->{var}{wiz_banner}; @@ -384,8 +386,6 @@ sub do_it { } standalone->explanations("Samba deny $o->{var}{wiz_hosts_deny}"); standalone->explanations("Samba allow $o->{var}{wiz_hosts_allow}"); -# $conf->chg_var("global", "hosts deny", $o->{var}{wiz_hosts_deny}); -# $conf->chg_var("global", "hosts allow", $o->{var}{wiz_hosts_allow}); if ($o->{var}{wiz_do_printer_sharing}) { standalone->explanations("Enabling printer sharing"); @@ -403,5 +403,7 @@ sub do_it { } else { services::start('smb') } + undef $w; + check_started('smbd'); } 1; |