[libhttp-entity-parser-perl] 02/04: use parse_urlencoded_arrayref

gregor herrmann gregoa at debian.org
Sun Oct 23 00:23:41 UTC 2016


This is an automated email from the git hooks/post-receive script.

gregoa pushed a commit to tag 0.12
in repository libhttp-entity-parser-perl.

commit 4c9ddc7580098c5b9ed6e4fe1a72304be72b71d1
Author: Masahiro Nagano <kazeburo at gmail.com>
Date:   Mon Feb 24 22:54:06 2014 +0900

    use parse_urlencoded_arrayref
---
 cpanfile                             | 5 ++---
 lib/HTTP/Entity/Parser/UrlEncoded.pm | 4 ++--
 2 files changed, 4 insertions(+), 5 deletions(-)

diff --git a/cpanfile b/cpanfile
index 58ed1be..a9298d6 100644
--- a/cpanfile
+++ b/cpanfile
@@ -5,9 +5,8 @@ requires 'JSON' => '2';
 requires 'Encode';
 requires 'HTTP::MultiPartParser';
 requires 'File::Temp';
-requires 'WWW::Form::UrlEncoded', '0.13';
-
-suggests 'WWW::Form::UrlEncoded::XS', '0.13';
+requires 'WWW::Form::UrlEncoded', '0.17';
+suggests 'WWW::Form::UrlEncoded::XS', '0.17';
 
 on 'test' => sub {
     requires 'Test::More', '0.98';
diff --git a/lib/HTTP/Entity/Parser/UrlEncoded.pm b/lib/HTTP/Entity/Parser/UrlEncoded.pm
index d66b087..e82898f 100644
--- a/lib/HTTP/Entity/Parser/UrlEncoded.pm
+++ b/lib/HTTP/Entity/Parser/UrlEncoded.pm
@@ -2,7 +2,7 @@ package HTTP::Entity::Parser::UrlEncoded;
 
 use strict;
 use warnings;
-use WWW::Form::UrlEncoded qw/parse_urlencoded/;
+use WWW::Form::UrlEncoded qw/parse_urlencoded_arrayref/;
 
 sub new {
     bless [''], $_[0];
@@ -16,7 +16,7 @@ sub add {
 }
 
 sub finalize {
-    return ([parse_urlencoded($_[0]->[0])], []);
+    return (parse_urlencoded_arrayref($_[0]->[0]), []);
 }
 
 

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libhttp-entity-parser-perl.git



More information about the Pkg-perl-cvs-commits mailing list