}
&General::readhash("${General::swroot}/samba/settings", \%sambasettings);
-
+
if ($errormessage)
{
{
if (/^Name:\W+(.*)/)
{
- $testcmd = $1;
+ $testcmd = $1;
}
}
close FILE;
sub writeconfiguration() {
open (FILE, ">${General::swroot}/samba/global") or die "Can't save the global settings: $!";
flock (FILE, 2);
-
+
print FILE <<END;
# global.settings by IPFire Project