diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2002-08-01 19:39:26 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2002-08-01 19:39:26 +0000 |
| commit | af0430510356c70ea497fc108466c6236c1afcc1 (patch) | |
| tree | 17effe0a98c90f57475cf4f50920626efe387e93 /perl-install | |
| parent | c097645a9335a459f04a8390c8120cb9616456aa (diff) | |
| download | drakx-af0430510356c70ea497fc108466c6236c1afcc1.tar drakx-af0430510356c70ea497fc108466c6236c1afcc1.tar.gz drakx-af0430510356c70ea497fc108466c6236c1afcc1.tar.bz2 drakx-af0430510356c70ea497fc108466c6236c1afcc1.tar.xz drakx-af0430510356c70ea497fc108466c6236c1afcc1.zip | |
kill stupide style
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/tinyfirewall.pm | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/perl-install/tinyfirewall.pm b/perl-install/tinyfirewall.pm index f8d5889a9..e893f1667 100644 --- a/perl-install/tinyfirewall.pm +++ b/perl-install/tinyfirewall.pm @@ -82,10 +82,8 @@ sub SaveConfig { or die _("Can't open %s: %s\n", $config_file, $!); open TMPFILE, ">$tmp_file" or die _("Can't open %s for writing: %s\n", $tmp_file, $!); - while (my $line = <CONFIGFILE>) - { - if ($line =~ m/^(.+)\s*\=\s*"(.*)"/) - { + while (my $line = <CONFIGFILE>) { + if ($line =~ m/^(.+)\s*\=\s*"(.*)"/) { my ($variable, $value) = ($1, $2); my $newvalue = $settings{$variable}; $line =~ s/".*"/"$newvalue"/ |