r67611 - in /trunk/libhttp-body-perl: ./ debian/ inc/ lib/HTTP/ lib/HTTP/Body/ t/ t/data/multipart/ t/data/urlencoded/ t/data/xforms/
eloy at users.alioth.debian.org
eloy at users.alioth.debian.org
Fri Jan 21 17:29:11 UTC 2011
Author: eloy
Date: Fri Jan 21 17:28:57 2011
New Revision: 67611
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=67611
Log:
new upstream version
Removed:
trunk/libhttp-body-perl/inc/
Modified:
trunk/libhttp-body-perl/Changes
trunk/libhttp-body-perl/MANIFEST
trunk/libhttp-body-perl/META.yml
trunk/libhttp-body-perl/Makefile.PL
trunk/libhttp-body-perl/README
trunk/libhttp-body-perl/debian/changelog
trunk/libhttp-body-perl/dist.ini
trunk/libhttp-body-perl/lib/HTTP/Body.pm
trunk/libhttp-body-perl/lib/HTTP/Body/MultiPart.pm
trunk/libhttp-body-perl/lib/HTTP/Body/OctetStream.pm
trunk/libhttp-body-perl/lib/HTTP/Body/UrlEncoded.pm
trunk/libhttp-body-perl/lib/HTTP/Body/XForms.pm
trunk/libhttp-body-perl/lib/HTTP/Body/XFormsMultipart.pm
trunk/libhttp-body-perl/t/04multipart.t
trunk/libhttp-body-perl/t/05urlencoded.t
trunk/libhttp-body-perl/t/07xforms.t
trunk/libhttp-body-perl/t/08multipart-suffix.t
trunk/libhttp-body-perl/t/data/multipart/001-results.pml
trunk/libhttp-body-perl/t/data/multipart/002-results.pml
trunk/libhttp-body-perl/t/data/multipart/003-results.pml
trunk/libhttp-body-perl/t/data/multipart/004-results.pml
trunk/libhttp-body-perl/t/data/multipart/005-results.pml
trunk/libhttp-body-perl/t/data/multipart/006-results.pml
trunk/libhttp-body-perl/t/data/multipart/007-results.pml
trunk/libhttp-body-perl/t/data/multipart/008-results.pml
trunk/libhttp-body-perl/t/data/multipart/009-results.pml
trunk/libhttp-body-perl/t/data/multipart/010-results.pml
trunk/libhttp-body-perl/t/data/multipart/011-results.pml
trunk/libhttp-body-perl/t/data/multipart/012-results.pml
trunk/libhttp-body-perl/t/data/multipart/013-results.pml
trunk/libhttp-body-perl/t/data/urlencoded/001-results.pml
trunk/libhttp-body-perl/t/data/urlencoded/002-results.pml
trunk/libhttp-body-perl/t/data/urlencoded/003-results.pml
trunk/libhttp-body-perl/t/data/urlencoded/004-results.pml
trunk/libhttp-body-perl/t/data/urlencoded/005-results.pml
trunk/libhttp-body-perl/t/data/urlencoded/006-results.pml
trunk/libhttp-body-perl/t/data/xforms/001-results.pml
trunk/libhttp-body-perl/t/data/xforms/002-results.pml
Modified: trunk/libhttp-body-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/Changes?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/Changes (original)
+++ trunk/libhttp-body-perl/Changes Fri Jan 21 17:28:57 2011
@@ -1,11 +1,17 @@
This file documents the revision history for Perl extension HTTP::Body.
+
+1.11 Tue 26 Oct 2010 14:10:00 UTC
+ - Added param_order capability (Torsten Raudssus [GETTY])
+
+1.10 Fri 8 Oct 2010 15:50:55 UTC
+ - Patch for test failure ( thanks KENTNL/MITHALDU! )
1.09 Thu 19 Aug 2010 19:08:55 UTC
- remove blib for PAUSE indexing.
1.08 Thu 19 Aug 2010 18:08:42 UTC
- Temp files now preserve the suffix of the uploaded file. This makes
- it possible to feed the file directly into a mime-type-determing
+ it possible to feed the file directly into a mime-type-determining
module that may rely on this suffix as part of its heuristic. (Dave
Rolsky)
- Fix for RT#54443 Xforms buffering incorrectly (Simon Elliott)
Modified: trunk/libhttp-body-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/MANIFEST?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/MANIFEST (original)
+++ trunk/libhttp-body-perl/MANIFEST Fri Jan 21 17:28:57 2011
@@ -5,14 +5,6 @@
Makefile.PL
README
dist.ini
-inc/Module/Install.pm
-inc/Module/Install/Base.pm
-inc/Module/Install/Can.pm
-inc/Module/Install/Fetch.pm
-inc/Module/Install/Makefile.pm
-inc/Module/Install/Metadata.pm
-inc/Module/Install/Win32.pm
-inc/Module/Install/WriteAll.pm
lib/HTTP/Body.pm
lib/HTTP/Body/MultiPart.pm
lib/HTTP/Body/OctetStream.pm
Modified: trunk/libhttp-body-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/META.yml?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/META.yml (original)
+++ trunk/libhttp-body-perl/META.yml Fri Jan 21 17:28:57 2011
@@ -10,7 +10,7 @@
configure_requires:
ExtUtils::MakeMaker: 6.31
dynamic_config: 0
-generated_by: 'Dist::Zilla version 4.102221, CPAN::Meta::Converter version 2.102160'
+generated_by: 'Dist::Zilla version 4.102342, CPAN::Meta::Converter version 2.102400'
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -21,4 +21,7 @@
File::Temp: 0.14
HTTP::Headers: 0
IO::File: 1.14
-version: 1.09
+resources:
+ X_mailing_list: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst-dev
+ repository: https://dev.catalystframework.org/repos/Catalyst/trunk/HTTP-Body/
+version: 1.11
Modified: trunk/libhttp-body-perl/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/Makefile.PL?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/Makefile.PL (original)
+++ trunk/libhttp-body-perl/Makefile.PL Fri Jan 21 17:28:57 2011
@@ -28,7 +28,7 @@
'HTTP::Headers' => '0',
'IO::File' => '1.14'
},
- 'VERSION' => '1.09',
+ 'VERSION' => '1.11',
'test' => {
'TESTS' => 't/*.t'
}
Modified: trunk/libhttp-body-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/README?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/README (original)
+++ trunk/libhttp-body-perl/README Fri Jan 21 17:28:57 2011
@@ -1,7 +1,7 @@
This archive contains the distribution HTTP-Body,
-version 1.09:
+version 1.11:
HTTP Body Parser
Modified: trunk/libhttp-body-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/debian/changelog?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/debian/changelog (original)
+++ trunk/libhttp-body-perl/debian/changelog Fri Jan 21 17:28:57 2011
@@ -1,3 +1,9 @@
+libhttp-body-perl (1.11-1) UNRELEASED; urgency=low
+
+ * New upstream release
+
+ -- Krzysztof Krzyżaniak (eloy) <eloy at debian.org> Fri, 21 Jan 2011 18:28:11 +0100
+
libhttp-body-perl (1.09-2) UNRELEASED; urgency=low
TODO: Copyright information for t/data/benchmark is missing. There is at
Modified: trunk/libhttp-body-perl/dist.ini
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/dist.ini?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/dist.ini (original)
+++ trunk/libhttp-body-perl/dist.ini Fri Jan 21 17:28:57 2011
@@ -1,5 +1,5 @@
name = HTTP-Body
-version = 1.09
+version = 1.11
author = Christian Hansen, C<chansen at cpan.org>
author = Sebastian Riedel, C<sri at cpan.org>
author = Andy Grundman, C<andy at hybridized.org>
@@ -18,4 +18,10 @@
[Prereqs / TestRequires]
Test::More = 0.86
-Test::Deep = 0
+Test::Deep = 0
+
+[MetaResources]
+repository.web = http://dev.catalystframework.org/repos/Catalyst/trunk/HTTP-Body/
+repository.url = https://dev.catalystframework.org/repos/Catalyst/trunk/HTTP-Body/
+repository.type = svn
+x_mailing_list = http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst-dev
Modified: trunk/libhttp-body-perl/lib/HTTP/Body.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/lib/HTTP/Body.pm?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/lib/HTTP/Body.pm (original)
+++ trunk/libhttp-body-perl/lib/HTTP/Body.pm Fri Jan 21 17:28:57 2011
@@ -1,6 +1,6 @@
package HTTP::Body;
BEGIN {
- $HTTP::Body::VERSION = '1.09';
+ $HTTP::Body::VERSION = '1.11';
}
use strict;
@@ -50,9 +50,10 @@
$body->add($buffer);
}
- my $uploads = $body->upload; # hashref
- my $params = $body->param; # hashref
- my $body = $body->body; # IO::Handle
+ my $uploads = $body->upload; # hashref
+ my $params = $body->param; # hashref
+ my $param_order = $body->param_order # arrayref
+ my $body = $body->body; # IO::Handle
}
=head1 DESCRIPTION
@@ -109,6 +110,7 @@
content_type => $content_type,
length => 0,
param => {},
+ param_order => [],
state => 'buffering',
upload => {},
tmpdir => File::Spec->tmpdir(),
@@ -347,6 +349,8 @@
else {
$self->{param}->{$name} = $value;
}
+
+ push @{$self->{param_order}}, $name;
}
return $self->{param};
@@ -391,8 +395,32 @@
return $self->{tmpdir};
}
+=item param_order
+
+Returns the array ref of the param keys in the order how they appeared on the body
+
+=cut
+
+sub param_order {
+ return shift->{param_order};
+}
+
=back
+=head1 SUPPORT
+
+Since its original creation this module has been taken over by the Catalyst
+development team. If you want to contribute patches, these will be your
+primary contact points:
+
+IRC:
+
+ Join #catalyst-dev on irc.perl.org.
+
+Mailing Lists:
+
+ http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst-dev
+
=head1 AUTHOR
Christian Hansen, C<chansen at cpan.org>
@@ -400,6 +428,16 @@
Sebastian Riedel, C<sri at cpan.org>
Andy Grundman, C<andy at hybridized.org>
+
+=head1 CONTRIBUTORS
+
+Simon Elliott C<cpan at papercreatures.com>
+
+Kent Fredric <kentnl at cpan.org>
+
+Christian Walde
+
+Torsten Raudssus <torsten at raudssus.de>
=head1 LICENSE
Modified: trunk/libhttp-body-perl/lib/HTTP/Body/MultiPart.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/lib/HTTP/Body/MultiPart.pm?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/lib/HTTP/Body/MultiPart.pm (original)
+++ trunk/libhttp-body-perl/lib/HTTP/Body/MultiPart.pm Fri Jan 21 17:28:57 2011
@@ -1,6 +1,6 @@
package HTTP::Body::MultiPart;
BEGIN {
- $HTTP::Body::MultiPart::VERSION = '1.09';
+ $HTTP::Body::MultiPart::VERSION = '1.11';
}
use strict;
@@ -9,6 +9,7 @@
use IO::File;
use File::Temp 0.14;
+use File::Spec;
=head1 NAME
@@ -273,7 +274,8 @@
$part->{filename} = $filename;
if ( $filename ne "" ) {
- my $suffix = $filename =~ /[^.]+(\.[^\\\/]+)$/ ? $1 : q{};
+ my $basename = (File::Spec->splitpath($filename))[2];
+ my $suffix = $basename =~ /[^.]+(\.[^\\\/]+)$/ ? $1 : q{};
my $fh = File::Temp->new( UNLINK => 0, DIR => $self->tmpdir, SUFFIX => $suffix );
@@ -310,6 +312,10 @@
Christian Hansen, C<ch at ngmedia.com>
+=head1 CONTRIBUTORS
+
+Torsten Raudssus, C<torsten at raudssus.de>
+
=head1 LICENSE
This library is free software . You can redistribute it and/or modify
Modified: trunk/libhttp-body-perl/lib/HTTP/Body/OctetStream.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/lib/HTTP/Body/OctetStream.pm?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/lib/HTTP/Body/OctetStream.pm (original)
+++ trunk/libhttp-body-perl/lib/HTTP/Body/OctetStream.pm Fri Jan 21 17:28:57 2011
@@ -1,6 +1,6 @@
package HTTP::Body::OctetStream;
BEGIN {
- $HTTP::Body::OctetStream::VERSION = '1.09';
+ $HTTP::Body::OctetStream::VERSION = '1.11';
}
use strict;
Modified: trunk/libhttp-body-perl/lib/HTTP/Body/UrlEncoded.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/lib/HTTP/Body/UrlEncoded.pm?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/lib/HTTP/Body/UrlEncoded.pm (original)
+++ trunk/libhttp-body-perl/lib/HTTP/Body/UrlEncoded.pm Fri Jan 21 17:28:57 2011
@@ -1,6 +1,6 @@
package HTTP::Body::UrlEncoded;
BEGIN {
- $HTTP::Body::UrlEncoded::VERSION = '1.09';
+ $HTTP::Body::UrlEncoded::VERSION = '1.11';
}
use strict;
Modified: trunk/libhttp-body-perl/lib/HTTP/Body/XForms.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/lib/HTTP/Body/XForms.pm?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/lib/HTTP/Body/XForms.pm (original)
+++ trunk/libhttp-body-perl/lib/HTTP/Body/XForms.pm Fri Jan 21 17:28:57 2011
@@ -1,6 +1,6 @@
package HTTP::Body::XForms;
BEGIN {
- $HTTP::Body::XForms::VERSION = '1.09';
+ $HTTP::Body::XForms::VERSION = '1.11';
}
use strict;
Modified: trunk/libhttp-body-perl/lib/HTTP/Body/XFormsMultipart.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/lib/HTTP/Body/XFormsMultipart.pm?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/lib/HTTP/Body/XFormsMultipart.pm (original)
+++ trunk/libhttp-body-perl/lib/HTTP/Body/XFormsMultipart.pm Fri Jan 21 17:28:57 2011
@@ -1,6 +1,6 @@
package HTTP::Body::XFormsMultipart;
BEGIN {
- $HTTP::Body::XFormsMultipart::VERSION = '1.09';
+ $HTTP::Body::XFormsMultipart::VERSION = '1.11';
}
use strict;
Modified: trunk/libhttp-body-perl/t/04multipart.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/04multipart.t?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/04multipart.t (original)
+++ trunk/libhttp-body-perl/t/04multipart.t Fri Jan 21 17:28:57 2011
@@ -6,7 +6,7 @@
use FindBin;
use lib "$FindBin::Bin/lib";
-use Test::More tests => 140;
+use Test::More tests => 153;
use Test::Deep;
use Cwd;
@@ -63,9 +63,10 @@
$results->{upload}->{$field}->{tempname} = ignore();
}
}
-
+
cmp_deeply( $body->body, $results->{body}, "$test MultiPart body" );
cmp_deeply( $body->param, $results->{param}, "$test MultiPart param" );
+ cmp_deeply( $body->param_order, $results->{param_order} ? $results->{param_order} : [], "$test MultiPart param_order" );
cmp_deeply( $body->upload, $results->{upload}, "$test MultiPart upload" )
if $results->{upload};
cmp_ok( $body->state, 'eq', 'done', "$test MultiPart state" );
@@ -82,4 +83,5 @@
for my $temp ( @temps ) {
ok( !-e $temp, "Temp file $temp was deleted" );
}
+
}
Modified: trunk/libhttp-body-perl/t/05urlencoded.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/05urlencoded.t?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/05urlencoded.t (original)
+++ trunk/libhttp-body-perl/t/05urlencoded.t Fri Jan 21 17:28:57 2011
@@ -6,7 +6,7 @@
use FindBin;
use lib "$FindBin::Bin/lib";
-use Test::More tests => 31;
+use Test::More tests => 37;
use Cwd;
use Digest::MD5 qw(md5_hex);
@@ -33,6 +33,7 @@
is_deeply( $body->body, $results->{body}, "$test UrlEncoded body" );
is_deeply( $body->param, $results->{param}, "$test UrlEncoded param" );
+ is_deeply( $body->param_order, $results->{param_order} ? $results->{param_order} : [], "$test UrlEncoded param_order" );
is_deeply( $body->upload, $results->{upload}, "$test UrlEncoded upload" );
cmp_ok( $body->state, 'eq', 'done', "$test UrlEncoded state" );
cmp_ok( $body->length, '==', $body->content_length, "$test UrlEncoded length" );
Modified: trunk/libhttp-body-perl/t/07xforms.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/07xforms.t?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/07xforms.t (original)
+++ trunk/libhttp-body-perl/t/07xforms.t Fri Jan 21 17:28:57 2011
@@ -6,7 +6,7 @@
use FindBin;
use lib "$FindBin::Bin/lib";
-use Test::More tests => 12;
+use Test::More tests => 14;
use Cwd;
use HTTP::Body;
@@ -44,6 +44,7 @@
is_deeply( $body->body, $results->{body}, "$test XForms body" );
is_deeply( $body->param, $results->{param}, "$test XForms param" );
+ is_deeply( $body->param_order, $results->{param_order} ? $results->{param_order} : [], "$test XForms param_order" );
is_deeply( $body->upload, $results->{upload}, "$test XForms upload" );
if ( $body->isa('HTTP::Body::XFormsMultipart') ) {
cmp_ok( $body->start, 'eq', $results->{start}, "$test XForms start" );
Modified: trunk/libhttp-body-perl/t/08multipart-suffix.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/08multipart-suffix.t?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/08multipart-suffix.t (original)
+++ trunk/libhttp-body-perl/t/08multipart-suffix.t Fri Jan 21 17:28:57 2011
@@ -54,8 +54,8 @@
'tempname preserves .txt suffix when dir name has .'
);
- unlike(
- $uploads->{upload2}{tempname}, qr/\\/,
+ like(
+ $uploads->{upload2}{tempname}, qr/[\\\/]\w+.txt$/,
'tempname only gets extension from filename, not from a directory name'
);
}
Modified: trunk/libhttp-body-perl/t/data/multipart/001-results.pml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/data/multipart/001-results.pml?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/data/multipart/001-results.pml (original)
+++ trunk/libhttp-body-perl/t/data/multipart/001-results.pml Fri Jan 21 17:28:57 2011
@@ -56,5 +56,8 @@
"A",
"B"
]
- }
+ },
+ "param_order" => [
+ "text1", "text2", "select", "select", "textarea"
+ ]
}
Modified: trunk/libhttp-body-perl/t/data/multipart/002-results.pml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/data/multipart/002-results.pml?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/data/multipart/002-results.pml (original)
+++ trunk/libhttp-body-perl/t/data/multipart/002-results.pml Fri Jan 21 17:28:57 2011
@@ -39,5 +39,8 @@
"A",
"B"
]
- }
+ },
+ "param_order" => [
+ "text1", "text2", "select", "select", "textarea"
+ ]
}
Modified: trunk/libhttp-body-perl/t/data/multipart/003-results.pml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/data/multipart/003-results.pml?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/data/multipart/003-results.pml (original)
+++ trunk/libhttp-body-perl/t/data/multipart/003-results.pml Fri Jan 21 17:28:57 2011
@@ -36,5 +36,8 @@
"A",
"B"
]
- }
+ },
+ "param_order" => [
+ "text1", "text2", "select", "select", "textarea"
+ ]
}
Modified: trunk/libhttp-body-perl/t/data/multipart/004-results.pml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/data/multipart/004-results.pml?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/data/multipart/004-results.pml (original)
+++ trunk/libhttp-body-perl/t/data/multipart/004-results.pml Fri Jan 21 17:28:57 2011
@@ -39,5 +39,8 @@
"A",
"B"
]
- }
+ },
+ "param_order" => [
+ "text1", "text2", "select", "select", "textarea"
+ ]
}
Modified: trunk/libhttp-body-perl/t/data/multipart/005-results.pml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/data/multipart/005-results.pml?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/data/multipart/005-results.pml (original)
+++ trunk/libhttp-body-perl/t/data/multipart/005-results.pml Fri Jan 21 17:28:57 2011
@@ -39,5 +39,8 @@
"A",
"B"
]
- }
+ },
+ "param_order" => [
+ "text1", "text2", "select", "select", "textarea"
+ ]
}
Modified: trunk/libhttp-body-perl/t/data/multipart/006-results.pml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/data/multipart/006-results.pml?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/data/multipart/006-results.pml (original)
+++ trunk/libhttp-body-perl/t/data/multipart/006-results.pml Fri Jan 21 17:28:57 2011
@@ -39,5 +39,8 @@
"A",
"B"
]
- }
+ },
+ "param_order" => [
+ "text1", "text2", "select", "select", "textarea"
+ ]
}
Modified: trunk/libhttp-body-perl/t/data/multipart/007-results.pml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/data/multipart/007-results.pml?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/data/multipart/007-results.pml (original)
+++ trunk/libhttp-body-perl/t/data/multipart/007-results.pml Fri Jan 21 17:28:57 2011
@@ -39,5 +39,8 @@
"A",
"B"
]
- }
+ },
+ "param_order" => [
+ "text1", "text2", "select", "select", "textarea"
+ ]
}
Modified: trunk/libhttp-body-perl/t/data/multipart/008-results.pml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/data/multipart/008-results.pml?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/data/multipart/008-results.pml (original)
+++ trunk/libhttp-body-perl/t/data/multipart/008-results.pml Fri Jan 21 17:28:57 2011
@@ -39,5 +39,8 @@
"A",
"B"
]
- }
+ },
+ "param_order" => [
+ "text1", "text2", "select", "select", "textarea"
+ ]
}
Modified: trunk/libhttp-body-perl/t/data/multipart/009-results.pml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/data/multipart/009-results.pml?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/data/multipart/009-results.pml (original)
+++ trunk/libhttp-body-perl/t/data/multipart/009-results.pml Fri Jan 21 17:28:57 2011
@@ -39,5 +39,8 @@
"A",
"B"
]
- }
+ },
+ "param_order" => [
+ "text1", "text2", "select", "select", "textarea"
+ ]
}
Modified: trunk/libhttp-body-perl/t/data/multipart/010-results.pml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/data/multipart/010-results.pml?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/data/multipart/010-results.pml (original)
+++ trunk/libhttp-body-perl/t/data/multipart/010-results.pml Fri Jan 21 17:28:57 2011
@@ -37,5 +37,8 @@
"A",
"B"
]
- }
+ },
+ "param_order" => [
+ "text1", "text2", "select", "select", "textarea"
+ ]
}
Modified: trunk/libhttp-body-perl/t/data/multipart/011-results.pml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/data/multipart/011-results.pml?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/data/multipart/011-results.pml (original)
+++ trunk/libhttp-body-perl/t/data/multipart/011-results.pml Fri Jan 21 17:28:57 2011
@@ -37,5 +37,8 @@
"A",
"B"
]
- }
+ },
+ "param_order" => [
+ "text1", "text2", "select", "select", "textarea"
+ ]
}
Modified: trunk/libhttp-body-perl/t/data/multipart/012-results.pml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/data/multipart/012-results.pml?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/data/multipart/012-results.pml (original)
+++ trunk/libhttp-body-perl/t/data/multipart/012-results.pml Fri Jan 21 17:28:57 2011
@@ -37,5 +37,8 @@
"A",
"B"
]
- }
+ },
+ "param_order" => [
+ "text1", "text2", "select", "select", "textarea"
+ ]
}
Modified: trunk/libhttp-body-perl/t/data/multipart/013-results.pml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/data/multipart/013-results.pml?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/data/multipart/013-results.pml (original)
+++ trunk/libhttp-body-perl/t/data/multipart/013-results.pml Fri Jan 21 17:28:57 2011
@@ -8,5 +8,8 @@
"A",
"B"
]
- }
+ },
+ "param_order" => [
+ "text1", "text2", "select", "select", "textarea"
+ ]
}
Modified: trunk/libhttp-body-perl/t/data/urlencoded/001-results.pml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/data/urlencoded/001-results.pml?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/data/urlencoded/001-results.pml (original)
+++ trunk/libhttp-body-perl/t/data/urlencoded/001-results.pml Fri Jan 21 17:28:57 2011
@@ -10,5 +10,8 @@
"A",
"B"
]
- }
+ },
+ "param_order" => [
+ "text1", "text2", "select", "select", "textarea", "encoding"
+ ]
}
Modified: trunk/libhttp-body-perl/t/data/urlencoded/002-results.pml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/data/urlencoded/002-results.pml?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/data/urlencoded/002-results.pml (original)
+++ trunk/libhttp-body-perl/t/data/urlencoded/002-results.pml Fri Jan 21 17:28:57 2011
@@ -4,5 +4,8 @@
"param" => {
"one" => "foo",
"two" => "bar"
- }
+ },
+ "param_order" => [
+ "one", "two"
+ ],
}
Modified: trunk/libhttp-body-perl/t/data/urlencoded/003-results.pml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/data/urlencoded/003-results.pml?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/data/urlencoded/003-results.pml (original)
+++ trunk/libhttp-body-perl/t/data/urlencoded/003-results.pml Fri Jan 21 17:28:57 2011
@@ -10,5 +10,8 @@
"A",
"B"
]
- }
+ },
+ "param_order" => [
+ "text1", "text2", "select", "select", "textarea", "encoding"
+ ]
}
Modified: trunk/libhttp-body-perl/t/data/urlencoded/004-results.pml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/data/urlencoded/004-results.pml?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/data/urlencoded/004-results.pml (original)
+++ trunk/libhttp-body-perl/t/data/urlencoded/004-results.pml Fri Jan 21 17:28:57 2011
@@ -4,5 +4,8 @@
"param" => {
"one" => "foo",
"two" => "bar"
- }
+ },
+ "param_order" => [
+ "one", "two"
+ ]
}
Modified: trunk/libhttp-body-perl/t/data/urlencoded/005-results.pml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/data/urlencoded/005-results.pml?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/data/urlencoded/005-results.pml (original)
+++ trunk/libhttp-body-perl/t/data/urlencoded/005-results.pml Fri Jan 21 17:28:57 2011
@@ -4,5 +4,8 @@
"param" => {
"one" => "foo",
"two" => "bar"
- }
+ },
+ "param_order" => [
+ "one", "two"
+ ]
}
Modified: trunk/libhttp-body-perl/t/data/urlencoded/006-results.pml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/data/urlencoded/006-results.pml?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/data/urlencoded/006-results.pml (original)
+++ trunk/libhttp-body-perl/t/data/urlencoded/006-results.pml Fri Jan 21 17:28:57 2011
@@ -4,5 +4,8 @@
"param" => {
"one" => "foo",
"two" => "bar=bam"
- }
+ },
+ "param_order" => [
+ "one", "two"
+ ]
}
Modified: trunk/libhttp-body-perl/t/data/xforms/001-results.pml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/data/xforms/001-results.pml?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/data/xforms/001-results.pml (original)
+++ trunk/libhttp-body-perl/t/data/xforms/001-results.pml Fri Jan 21 17:28:57 2011
@@ -21,5 +21,8 @@
"param" => {
"XForms:Model" => "<model><data1>asdfg</data1><data2>asdfg</data2></model>"
},
+ param_order => [
+ "XForms:Model"
+ ],
"start" => "asdfg\@asdfg.com"
}
Modified: trunk/libhttp-body-perl/t/data/xforms/002-results.pml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhttp-body-perl/t/data/xforms/002-results.pml?rev=67611&op=diff
==============================================================================
--- trunk/libhttp-body-perl/t/data/xforms/002-results.pml (original)
+++ trunk/libhttp-body-perl/t/data/xforms/002-results.pml Fri Jan 21 17:28:57 2011
@@ -3,5 +3,8 @@
"upload" => {},
"param" => {
"XForms:Model" => "<model><data1>asdfg</data1><data2>asdfg</data2></model>"
- }
+ },
+ param_order => [
+ "XForms:Model"
+ ]
}
More information about the Pkg-perl-cvs-commits
mailing list