From 55b0c27fdb66982c79cde3713573478880b162d1 Mon Sep 17 00:00:00 2001 From: Antoine Ginies Date: Wed, 25 May 2005 09:01:37 +0000 Subject: display a wait message box --- samba_wizard/Samba.pm | 6 ++++-- 1 file 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; -- cgit v1.2.1