changeset 8046:861f076eab72

Perl: removed unused variables, forgotten in ef6a3a99a81a.
author Sergey Kandaurov <pluknet@nginx.com>
date Tue, 14 Jun 2022 10:39:58 +0400
parents aa28c802409f
children 1b7c7c3af6d9
files src/http/modules/perl/nginx.xs
diffstat 1 files changed, 1 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/http/modules/perl/nginx.xs
+++ b/src/http/modules/perl/nginx.xs
@@ -269,8 +269,7 @@ header_in(r, key)
     u_char                     *p, *lowcase_key, *value, sep;
     STRLEN                      len;
     ssize_t                     size;
-    ngx_uint_t                  i, n, hash;
-    ngx_array_t                *a;
+    ngx_uint_t                  i, hash;
     ngx_list_part_t            *part;
     ngx_table_elt_t            *h, *header, **ph;
     ngx_http_header_t          *hh;