Commit: f5164859597a71bc08a7ebe3f3d65badeff5922f - ultramonkey-l7-v3 (git)

UltraMonkey-L7 V3(multi-thread implementation)

Commit MetaInfo

• Revision: f5164859597a71bc08a7ebe3f3d65badeff5922f (tree)
• Zeit: 2012-09-14 17:22:23
• Autor: hibari <l05102@shib...>
• Commiter: hibari

Log Message

Rev b9d8e26 のコミットで変数の初期化処理を削除してしまっていたため、
l7directordがreload時等に以下のwarningを出力するようになっていた
問題を修正。

[WRN0301] Perl warning: Use of uninitialized value in concatenation (.) or string at /usr/sbin/l7directord line
3457.'

Ändern Zusammenfassung

• modified: l7directord/l7directord

Diff

--- a/l7directord/l7directord
+++ b/l7directord/l7directord
@@ -942,6 +942,7 @@ sub validate_config {
         elsif ($name eq 'module') {
             my $module = undef;
             my $option = undef;
+            my $key = q{};
             if (defined $value) {
                 $value =~ s/["']//g;
                 ($module, $option) = split /\s+/, $value, 2;
@@ -949,7 +950,7 @@ sub validate_config {
             if ( $module =~ /[^a-z]/ ) {
                 config_error($line, 'ERR0111', $config);
             }
-            $value = {name => $module, option => $option};
+            $value = {name => $module, option => $option, key => $key};
         }
         elsif ($name eq 'sorryserver') {
             my $forward = 'masq';