From: Maxim Dounin <mdounin@mdounin.ru>
Date: Tue, 18 Aug 2015 13:26:05 +0000 (+0300)
Subject: Perl: fixed warning about "sep" may be used uninitialized.
X-Git-Tag: release-1.9.4~2
X-Git-Url: http://www.kaiwu.me/postgresql/commit/static/gitweb.js?a=commitdiff_plain;h=a0aea61b50e90adf94b713cef4b789f932107107;p=nginx.git

Perl: fixed warning about "sep" may be used uninitialized.
---

diff --git a/src/http/modules/perl/nginx.xs b/src/http/modules/perl/nginx.xs
index 71f17a8bb..ae8584502 100644
--- a/src/http/modules/perl/nginx.xs
+++ b/src/http/modules/perl/nginx.xs
@@ -268,19 +268,16 @@ header_in(r, key)
         }
 #endif
 
-        if (hh->offset) {
+        ph = (ngx_table_elt_t **) ((char *) &r->headers_in + hh->offset);
 
-            ph = (ngx_table_elt_t **) ((char *) &r->headers_in + hh->offset);
-
-            if (*ph) {
-                ngx_http_perl_set_targ((*ph)->value.data, (*ph)->value.len);
-
-                goto done;
-            }
+        if (*ph) {
+            ngx_http_perl_set_targ((*ph)->value.data, (*ph)->value.len);
 
-            XSRETURN_UNDEF;
+            goto done;
         }
 
+        XSRETURN_UNDEF;
+
     multi:
 
         /* Cookie, X-Forwarded-For */