From 13f65d07967b6deb212f6fc36799077311b09f2f Mon Sep 17 00:00:00 2001 From: Antoine Ginies Date: Mon, 6 Jun 2005 03:07:55 +0000 Subject: use a default smb.conf if /etc/samba/smb.conf doesnt exist --- samba_wizard/Samba.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'samba_wizard') diff --git a/samba_wizard/Samba.pm b/samba_wizard/Samba.pm index 0066fe4a..80d98bd5 100755 --- a/samba_wizard/Samba.pm +++ b/samba_wizard/Samba.pm @@ -71,6 +71,7 @@ my $o = { }; # we ask glueconf to give us the structure representing /etc/samba/smb.conf +if (!-f "/etc/samba/smb.conf") { cp_af("/usr/share/samba/smb.conf.clean", "/etc/samba/smb.conf"); } my $samba = new Libconf::Glueconf::Samba::Smb_conf({ filename => '/etc/samba/smb.conf', show_commented_info => 1 }); #debug @@ -85,7 +86,7 @@ my %type = ( ); my @yesorno = qw(yes no); push @yesorno, ""; -my @loglevel = qw(0 1 2 3 4 5 6 7 8 9 10); +my @loglevel = qw(0 1 2 3 4 5 6 7 8 9); $o->{pages} = { welcome => { -- cgit v1.2.1