Add ability to drop overly large packets

[onak.git] / onak-mail.pl.in

diff --git a/onak-mail.pl.in b/onak-mail.pl.in
index 68439d242079506fdeaac1eb24be8d9539321086..8231a127e22abd762e5ff495445b63a1d90f25d3 100644 (file)
--- a/onak-mail.pl.in
+++ b/onak-mail.pl.in
@@ -65,17 +65,17 @@ sub readconfig {
        open(CONFIG, "@CONFIG@") or
                die "Can't read config file: $!";
 
-       $section = "";
+       my $section = "";
        while (<CONFIG>) {
                if (/^#/ or /^$/) {
                        # Ignore; comment line.
                } elsif (/^\[(\w+)\]/) {
-                       section = $1;
-               } elsif ($section == "main") {
+                       $section = $1;
+               } elsif ($section eq "main") {
                        if (/^logfile\s*=\s*(.*)/) {
                                $config{'logfile'} = $1;
                        }
-               } elsif ($section == "mail") {
+               } elsif ($section eq "mail") {
                        if (/^this_site\s*=\s*(.*)/) {
                                $config{'thissite'} = $1;
                        } elsif (/^maintainer_email\s*=\s*(.*)/) {