INN commit: trunk/nnrpd (perl.c)

[INN Commit]

    Date: Sunday, September 4, 2016 @ 05:57:53
  Author: iulius
Revision: 10065

No need to compute again the (already known) size of the header in Perl nnrpd filter

Modified:
  trunk/nnrpd/perl.c

--------+
 perl.c |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

Modified: perl.c
===================================================================
--- perl.c	2016-09-04 12:55:40 UTC (rev 10064)
+++ perl.c	2016-09-04 12:57:53 UTC (rev 10065)
@@ -97,7 +97,7 @@
     hdr = perl_get_hv("hdr", true);
     for (hp = Table; hp < EndOfTable; hp++) {
         if (hp->Body)
-            (void) hv_store(hdr, (char *) hp->Name, strlen(hp->Name),
+            (void) hv_store(hdr, (char *) hp->Name, hp->Size,
                      newSVpv(hp->Body, 0), 0);
     }