diff options
| -rwxr-xr-x | samba_wizard/Samba.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/samba_wizard/Samba.pm b/samba_wizard/Samba.pm index ac063571..c827324f 100755 --- a/samba_wizard/Samba.pm +++ b/samba_wizard/Samba.pm @@ -73,8 +73,9 @@ my $o = { $::Wizard_pix_up = "/usr/share/wizards/samba_wizard/images/sambasrv.png"; # we ask glueconf to give us the structure representing /etc/samba/smb.conf if (!-f "/etc/samba/smb.conf") { mkdir_p("/etc/samba/"); cp_af("/usr/share/wizards/samba_wizard/scripts/smb.conf.default", "/etc/samba/smb.conf") } -#my $samba = new Libconf::Glueconf::Samba::Smb_conf({ filename => '/etc/samba/smb.conf', show_commented_info => 1 }); -my $samba = new Libconf::Glueconf::Samba::Smb_conf(filename => '/etc/samba/smb.conf', comments_struct => [['^\s*#'], ['^\s*;']]); +my $samba = new Libconf::Glueconf::Samba::Smb_conf({ filename => '/etc/samba/smb.conf', show_commented_info => 1 }); +#my $samba = new Libconf::Glueconf::Samba::Smb_conf(filename => '/etc/samba/smb.conf', comments_struct => [['^\s*#'], ['^\s*;']]); +$samba->{libconf}{disable_inline_comments} = 1; #debug use Data::Dumper; |