Hello community, here is the log from the commit of package perl-HTTP-Tiny for openSUSE:Factory checked in at 2016-08-20 12:27:08 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-HTTP-Tiny (Old) and /work/SRC/openSUSE:Factory/.perl-HTTP-Tiny.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-HTTP-Tiny" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-HTTP-Tiny/perl-HTTP-Tiny.changes 2016-05-12 09:33:23.000000000 +0200 +++ /work/SRC/openSUSE:Factory/.perl-HTTP-Tiny.new/perl-HTTP-Tiny.changes 2016-08-20 12:27:10.000000000 +0200 @@ -1,0 +2,43 @@ +Thu Aug 18 05:25:26 UTC 2016 - co...@suse.com + +- updated to 0.064 + see /usr/share/doc/packages/perl-HTTP-Tiny/Changes + + 0.064 2016-08-16 21:37:51-04:00 America/New_York + + - No changes from 0.063-TRIAL + + 0.063 2016-08-08 12:18:03-04:00 America/New_York (TRIAL RELEASE) + + [FIXED] + + - Fixed chunked transfer encoding, which previously omitted a trailing + CRLF. + + 0.061 2016-08-05 12:10:19-04:00 America/New_York (TRIAL RELEASE) + + [FIXED] + + - Avoid overwriting 'If-Modified-Since' header in mirror() if + the header already exists in something other than lower-case. + + [TESTS] + + - Normalize CRLF when reading test data files in t\150-post_form.t + on Win32 + + 0.059 2016-07-29 16:10:32-04:00 America/New_York (TRIAL RELEASE) + + [FIXED] + + - Timeout can now be set as a constructor argument again. + + - CVE-2016-1238: avoid loading optional modules from + @INC path with `.` at the end. + + [TESTS] + + - Updated tests for a future perl which may omit `.` from + the list of directories in @INC by default. + +------------------------------------------------------------------- Old: ---- HTTP-Tiny-0.058.tar.gz New: ---- HTTP-Tiny-0.064.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-HTTP-Tiny.spec ++++++ --- /var/tmp/diff_new_pack.YtNOfs/_old 2016-08-20 12:27:11.000000000 +0200 +++ /var/tmp/diff_new_pack.YtNOfs/_new 2016-08-20 12:27:11.000000000 +0200 @@ -17,7 +17,7 @@ Name: perl-HTTP-Tiny -Version: 0.058 +Version: 0.064 Release: 0 %define cpan_name HTTP-Tiny Summary: Small, Simple, Correct Http/1.1 Client ++++++ HTTP-Tiny-0.058.tar.gz -> HTTP-Tiny-0.064.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/Changes new/HTTP-Tiny-0.064/Changes --- old/HTTP-Tiny-0.058/Changes 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/Changes 2016-08-17 03:38:12.000000000 +0200 @@ -1,5 +1,42 @@ Release notes for HTTP-Tiny +0.064 2016-08-16 21:37:51-04:00 America/New_York + + - No changes from 0.063-TRIAL + +0.063 2016-08-08 12:18:03-04:00 America/New_York (TRIAL RELEASE) + + [FIXED] + + - Fixed chunked transfer encoding, which previously omitted a trailing + CRLF. + +0.061 2016-08-05 12:10:19-04:00 America/New_York (TRIAL RELEASE) + + [FIXED] + + - Avoid overwriting 'If-Modified-Since' header in mirror() if + the header already exists in something other than lower-case. + + [TESTS] + + - Normalize CRLF when reading test data files in t\150-post_form.t + on Win32 + +0.059 2016-07-29 16:10:32-04:00 America/New_York (TRIAL RELEASE) + + [FIXED] + + - Timeout can now be set as a constructor argument again. + + - CVE-2016-1238: avoid loading optional modules from + @INC path with `.` at the end. + + [TESTS] + + - Updated tests for a future perl which may omit `.` from + the list of directories in @INC by default. + 0.058 2016-05-03 11:29:57-04:00 America/New_York - No changes from 0.057 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/MANIFEST new/HTTP-Tiny-0.064/MANIFEST --- old/HTTP-Tiny-0.058/MANIFEST 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/MANIFEST 2016-08-17 03:38:12.000000000 +0200 @@ -1,4 +1,4 @@ -# This file was automatically generated by Dist::Zilla::Plugin::Manifest v6.003. +# This file was automatically generated by Dist::Zilla::Plugin::Manifest v6.007. CONTRIBUTING.mkdn Changes LICENSE @@ -88,6 +88,7 @@ t/001_api.t t/002_croakage.t t/003_agent.t +t/004_timeout.t t/010_url.t t/020_headers.t t/030_response.t @@ -120,7 +121,7 @@ xt/author/pod-coverage.t xt/author/pod-spell.t xt/author/pod-syntax.t +xt/author/portability.t xt/author/test-version.t xt/release/distmeta.t xt/release/minimum-version.t -xt/release/portability.t diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/META.json new/HTTP-Tiny-0.064/META.json --- old/HTTP-Tiny-0.058/META.json 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/META.json 2016-08-17 03:38:12.000000000 +0200 @@ -5,7 +5,7 @@ "David Golden <dagol...@cpan.org>" ], "dynamic_config" : 0, - "generated_by" : "Dist::Zilla version 6.003, CPAN::Meta::Converter version 2.150001", + "generated_by" : "Dist::Zilla version 6.007, CPAN::Meta::Converter version 2.150009", "license" : [ "perl_5" ], @@ -54,6 +54,7 @@ "Test::More" : "0", "Test::Pod" : "1.41", "Test::Pod::Coverage" : "1.08", + "Test::Portability::Files" : "0", "Test::Spelling" : "0.12", "Test::Version" : "1", "blib" : "1.01", @@ -100,6 +101,7 @@ "IO::Socket::INET" : "0", "IPC::Cmd" : "0", "Test::More" : "0.96", + "lib" : "0", "open" : "0", "perl" : "5.006" } @@ -108,7 +110,7 @@ "provides" : { "HTTP::Tiny" : { "file" : "lib/HTTP/Tiny.pm", - "version" : "0.058" + "version" : "0.064" } }, "release_status" : "stable", @@ -123,7 +125,7 @@ "web" : "https://github.com/chansen/p5-http-tiny" } }, - "version" : "0.058", + "version" : "0.064", "x_authority" : "cpan:DAGOLDEN", "x_contributors" : [ "Alan Gardner <gard...@pythian.com>", @@ -141,6 +143,7 @@ "James Raspass <jrasp...@gmail.com>", "Jeremy Mates <jma...@cpan.org>", "Jess Robinson <casta...@desert-island.me.uk>", + "Karen Etheridge <et...@cpan.org>", "Lukas Eklund <lekl...@gmail.com>", "Martin J. Evans <mj...@ntlworld.com>", "Martin-Louis Bright <mlbri...@gmail.com>", @@ -150,10 +153,12 @@ "Petr P\u00edsa\u0159 <ppi...@redhat.com>", "SkyMarshal <skymarshal1...@gmail.com>", "S\u00f6ren Kornetzki <soeren.kornet...@delti.com>", + "Steve Grazzini <steve.grazz...@grantstreet.com>", "Syohei YOSHIDA <syo...@gmail.com>", "Tatsuhiko Miyagawa <miyag...@bulknews.net>", "Tom Hukins <t...@eborcom.com>", "Tony Cook <t...@develop-help.com>" - ] + ], + "x_serialization_backend" : "Cpanel::JSON::XS version 3.0213" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/META.yml new/HTTP-Tiny-0.064/META.yml --- old/HTTP-Tiny-0.058/META.yml 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/META.yml 2016-08-17 03:38:12.000000000 +0200 @@ -15,13 +15,14 @@ IO::Socket::INET: '0' IPC::Cmd: '0' Test::More: '0.96' + lib: '0' open: '0' perl: '5.006' configure_requires: ExtUtils::MakeMaker: '6.17' perl: '5.006' dynamic_config: 0 -generated_by: 'Dist::Zilla version 6.003, CPAN::Meta::Converter version 2.150001' +generated_by: 'Dist::Zilla version 6.007, CPAN::Meta::Converter version 2.150009' license: perl meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html @@ -38,7 +39,7 @@ provides: HTTP::Tiny: file: lib/HTTP/Tiny.pm - version: '0.058' + version: '0.064' recommends: HTTP::CookieJar: '0.001' IO::Socket::IP: '0.32' @@ -60,7 +61,7 @@ bugtracker: https://github.com/chansen/p5-http-tiny/issues homepage: https://github.com/chansen/p5-http-tiny repository: https://github.com/chansen/p5-http-tiny.git -version: '0.058' +version: '0.064' x_authority: cpan:DAGOLDEN x_contributors: - 'Alan Gardner <gard...@pythian.com>' @@ -78,6 +79,7 @@ - 'James Raspass <jrasp...@gmail.com>' - 'Jeremy Mates <jma...@cpan.org>' - 'Jess Robinson <casta...@desert-island.me.uk>' + - 'Karen Etheridge <et...@cpan.org>' - 'Lukas Eklund <lekl...@gmail.com>' - 'Martin J. Evans <mj...@ntlworld.com>' - 'Martin-Louis Bright <mlbri...@gmail.com>' @@ -87,7 +89,9 @@ - 'Petr Písař <ppi...@redhat.com>' - 'SkyMarshal <skymarshal1...@gmail.com>' - 'Sören Kornetzki <soeren.kornet...@delti.com>' + - 'Steve Grazzini <steve.grazz...@grantstreet.com>' - 'Syohei YOSHIDA <syo...@gmail.com>' - 'Tatsuhiko Miyagawa <miyag...@bulknews.net>' - 'Tom Hukins <t...@eborcom.com>' - 'Tony Cook <t...@develop-help.com>' +x_serialization_backend: 'YAML::Tiny version 1.69' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/Makefile.PL new/HTTP-Tiny-0.064/Makefile.PL --- old/HTTP-Tiny-0.058/Makefile.PL 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/Makefile.PL 2016-08-17 03:38:12.000000000 +0200 @@ -1,4 +1,4 @@ -# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker v6.003. +# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker v6.007. use strict; use warnings; @@ -39,9 +39,10 @@ "IO::Socket::INET" => 0, "IPC::Cmd" => 0, "Test::More" => "0.96", + "lib" => 0, "open" => 0 }, - "VERSION" => "0.058", + "VERSION" => "0.064", "test" => { "TESTS" => "t/*.t" } @@ -67,6 +68,7 @@ "Test::More" => "0.96", "Time::Local" => 0, "bytes" => 0, + "lib" => 0, "open" => 0, "strict" => 0, "warnings" => 0 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/README new/HTTP-Tiny-0.064/README --- old/HTTP-Tiny-0.058/README 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/README 2016-08-17 03:38:12.000000000 +0200 @@ -2,7 +2,7 @@ HTTP::Tiny - A small, simple, correct HTTP/1.1 client VERSION - version 0.058 + version 0.064 SYNOPSIS use HTTP::Tiny; @@ -525,6 +525,8 @@ * Jess Robinson <casta...@desert-island.me.uk> + * Karen Etheridge <et...@cpan.org> + * Lukas Eklund <lekl...@gmail.com> * Martin J. Evans <mj...@ntlworld.com> @@ -543,6 +545,8 @@ * Sören Kornetzki <soeren.kornet...@delti.com> + * Steve Grazzini <steve.grazz...@grantstreet.com> + * Syohei YOSHIDA <syo...@gmail.com> * Tatsuhiko Miyagawa <miyag...@bulknews.net> diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/cpanfile new/HTTP-Tiny-0.064/cpanfile --- old/HTTP-Tiny-0.058/cpanfile 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/cpanfile 2016-08-17 03:38:12.000000000 +0200 @@ -27,6 +27,7 @@ requires "IO::Socket::INET" => "0"; requires "IPC::Cmd" => "0"; requires "Test::More" => "0.96"; + requires "lib" => "0"; requires "open" => "0"; requires "perl" => "5.006"; }; @@ -62,6 +63,7 @@ requires "Test::More" => "0"; requires "Test::Pod" => "1.41"; requires "Test::Pod::Coverage" => "1.08"; + requires "Test::Portability::Files" => "0"; requires "Test::Spelling" => "0.12"; requires "Test::Version" => "1"; requires "blib" => "1.01"; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/lib/HTTP/Tiny.pm new/HTTP-Tiny-0.064/lib/HTTP/Tiny.pm --- old/HTTP-Tiny-0.058/lib/HTTP/Tiny.pm 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/lib/HTTP/Tiny.pm 2016-08-17 03:38:12.000000000 +0200 @@ -4,7 +4,7 @@ use warnings; # ABSTRACT: A small, simple, correct HTTP/1.1 client -our $VERSION = '0.058'; +our $VERSION = '0.064'; use Carp (); @@ -110,7 +110,7 @@ my $self = { max_redirect => 5, - timeout => 60, + timeout => defined $args{timeout} ? $args{timeout} : 60, keep_alive => 1, verify_SSL => $args{verify_SSL} || $args{verify_ssl} || 0, # no verification by default no_proxy => $ENV{no_proxy}, @@ -282,6 +282,15 @@ my ($self, $url, $file, $args) = @_; @_ == 3 || (@_ == 4 && ref $args eq 'HASH') or Carp::croak(q/Usage: $http->mirror(URL, FILE, [HASHREF])/ . "\n"); + + if ( exists $args->{headers} ) { + my $headers = {}; + while ( my ($key, $value) = each %{$args->{headers} || {}} ) { + $headers->{lc $key} = $value; + } + $args->{headers} = $headers; + } + if ( -e $file and my $mtime = (stat($file))[9] ) { $args->{headers}{'if-modified-since'} ||= $self->_http_date($mtime); } @@ -504,6 +513,8 @@ my($ok, $reason) = (1, ''); # Need IO::Socket::SSL 1.42 for SSL_create_ctx_callback + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; unless (eval {require IO::Socket::SSL; IO::Socket::SSL->VERSION(1.42)}) { $ok = 0; $reason .= qq/IO::Socket::SSL 1.42 must be installed for https support\n/; @@ -1451,8 +1462,12 @@ $self->write($chunk); } $self->write("0\x0D\x0A"); - $self->write_header_lines($request->{trailer_cb}->()) - if ref $request->{trailer_cb} eq 'CODE'; + if ( ref $request->{trailer_cb} eq 'CODE' ) { + $self->write_header_lines($request->{trailer_cb}->()) + } + else { + $self->write("\x0D\x0A"); + } return $len; } @@ -1568,6 +1583,8 @@ return $ca_file; } + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; return Mozilla::CA::SSL_ca_file() if eval { require Mozilla::CA; 1 }; @@ -1639,7 +1656,7 @@ =head1 VERSION -version 0.058 +version 0.064 =head1 SYNOPSIS @@ -2262,7 +2279,7 @@ =head1 CONTRIBUTORS -=for stopwords Alan Gardner Alessandro Ghedini A. Sinan Unur Brad Gilbert brian m. carlson Chris Nehren Weyl Claes Jakobsson Clinton Gormley David Golden Dean Pearce Edward Zborowski James Raspass Jeremy Mates Jess Robinson Lukas Eklund Martin J. Evans Martin-Louis Bright Mike Doherty Olaf Alders Olivier Mengué Petr Písař SkyMarshal Sören Kornetzki Syohei YOSHIDA Tatsuhiko Miyagawa Tom Hukins Tony Cook +=for stopwords Alan Gardner Alessandro Ghedini A. Sinan Unur Brad Gilbert brian m. carlson Chris Nehren Weyl Claes Jakobsson Clinton Gormley David Golden Dean Pearce Edward Zborowski James Raspass Jeremy Mates Jess Robinson Karen Etheridge Lukas Eklund Martin J. Evans Martin-Louis Bright Mike Doherty Olaf Alders Olivier Mengué Petr Písař SkyMarshal Sören Kornetzki Steve Grazzini Syohei YOSHIDA Tatsuhiko Miyagawa Tom Hukins Tony Cook =over 4 @@ -2328,6 +2345,10 @@ =item * +Karen Etheridge <et...@cpan.org> + +=item * + Lukas Eklund <lekl...@gmail.com> =item * @@ -2364,6 +2385,10 @@ =item * +Steve Grazzini <steve.grazz...@grantstreet.com> + +=item * + Syohei YOSHIDA <syo...@gmail.com> =item * diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/00-report-prereqs.dd new/HTTP-Tiny-0.064/t/00-report-prereqs.dd --- old/HTTP-Tiny-0.058/t/00-report-prereqs.dd 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/00-report-prereqs.dd 2016-08-17 03:38:12.000000000 +0200 @@ -9,38 +9,39 @@ } }, 'develop' => { - 'requires' => { - 'Dist::Zilla' => '5', - 'Dist::Zilla::Plugin::Prereqs' => '0', - 'Dist::Zilla::Plugin::RemovePrereqs' => '0', - 'Dist::Zilla::PluginBundle::DAGOLDEN' => '0.072', - 'English' => '0', - 'File::Spec' => '0', - 'File::Temp' => '0', - 'IO::Handle' => '0', - 'IPC::Open3' => '0', - 'Perl::Critic::Policy::Lax::ProhibitStringyEval::ExceptForRequire' => '0', - 'Pod::Coverage::TrustPod' => '0', - 'Pod::Wordlist' => '0', - 'Software::License::Perl_5' => '0', - 'Test::CPAN::Meta' => '0', - 'Test::More' => '0', - 'Test::Pod' => '1.41', - 'Test::Pod::Coverage' => '1.08', - 'Test::Spelling' => '0.12', - 'Test::Version' => '1', - 'blib' => '1.01', - 'perl' => '5.006' - } - }, + 'requires' => { + 'Dist::Zilla' => '5', + 'Dist::Zilla::Plugin::Prereqs' => '0', + 'Dist::Zilla::Plugin::RemovePrereqs' => '0', + 'Dist::Zilla::PluginBundle::DAGOLDEN' => '0.072', + 'English' => '0', + 'File::Spec' => '0', + 'File::Temp' => '0', + 'IO::Handle' => '0', + 'IPC::Open3' => '0', + 'Perl::Critic::Policy::Lax::ProhibitStringyEval::ExceptForRequire' => '0', + 'Pod::Coverage::TrustPod' => '0', + 'Pod::Wordlist' => '0', + 'Software::License::Perl_5' => '0', + 'Test::CPAN::Meta' => '0', + 'Test::More' => '0', + 'Test::Pod' => '1.41', + 'Test::Pod::Coverage' => '1.08', + 'Test::Portability::Files' => '0', + 'Test::Spelling' => '0.12', + 'Test::Version' => '1', + 'blib' => '1.01', + 'perl' => '5.006' + } + }, 'runtime' => { 'recommends' => { - 'HTTP::CookieJar' => '0.001', - 'IO::Socket::IP' => '0.32', - 'IO::Socket::SSL' => '1.42', - 'Mozilla::CA' => '20160104', - 'Net::SSLeay' => '1.49' - }, + 'HTTP::CookieJar' => '0.001', + 'IO::Socket::IP' => '0.32', + 'IO::Socket::SSL' => '1.42', + 'Mozilla::CA' => '20160104', + 'Net::SSLeay' => '1.49' + }, 'requires' => { 'Carp' => '0', 'Fcntl' => '0', @@ -54,8 +55,8 @@ 'warnings' => '0' }, 'suggests' => { - 'IO::Socket::SSL' => '1.56' - } + 'IO::Socket::SSL' => '1.56' + } }, 'test' => { 'recommends' => { @@ -73,6 +74,7 @@ 'IO::Socket::INET' => '0', 'IPC::Cmd' => '0', 'Test::More' => '0.96', + 'lib' => '0', 'open' => '0', 'perl' => '5.006' } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/00-report-prereqs.t new/HTTP-Tiny-0.064/t/00-report-prereqs.t --- old/HTTP-Tiny-0.058/t/00-report-prereqs.t 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/00-report-prereqs.t 2016-08-17 03:38:12.000000000 +0200 @@ -3,7 +3,7 @@ use strict; use warnings; -# This test was generated by Dist::Zilla::Plugin::Test::ReportPrereqs 0.024 +# This test was generated by Dist::Zilla::Plugin::Test::ReportPrereqs 0.025 use Test::More tests => 1; @@ -78,10 +78,10 @@ # Add dynamic prereqs to the included modules list (if we can) my ($source) = grep { -f } 'MYMETA.json', 'MYMETA.yml'; -if ( $source && $HAS_CPAN_META ) { - if ( my $meta = eval { CPAN::Meta->load_file($source) } ) { - $full_prereqs = _merge_prereqs($full_prereqs, $meta->prereqs); - } +if ( $source && $HAS_CPAN_META + && (my $meta = eval { CPAN::Meta->load_file($source) } ) +) { + $full_prereqs = _merge_prereqs($full_prereqs, $meta->prereqs); } else { $source = 'static metadata'; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/002_croakage.t new/HTTP-Tiny-0.064/t/002_croakage.t --- old/HTTP-Tiny-0.058/t/002_croakage.t 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/002_croakage.t 2016-08-17 03:38:12.000000000 +0200 @@ -4,7 +4,8 @@ use warnings; use Test::More; -use t::Util qw[tmpfile monkey_patch set_socket_source]; +use lib 't'; +use Util qw[tmpfile monkey_patch set_socket_source]; use HTTP::Tiny; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/004_timeout.t new/HTTP-Tiny-0.064/t/004_timeout.t --- old/HTTP-Tiny-0.058/t/004_timeout.t 1970-01-01 01:00:00.000000000 +0100 +++ new/HTTP-Tiny-0.064/t/004_timeout.t 2016-08-17 03:38:12.000000000 +0200 @@ -0,0 +1,38 @@ +#!perl + +use strict; +use warnings; + +use Test::More tests => 5; +use HTTP::Tiny; + +# Just make sure timeout is handled correctly as a constructor param, +# and that it works as expected as an "attribute". + +my $default = 60; + +{ + my $ua = HTTP::Tiny->new(); + is $ua->timeout, $default, 'default timeout is as expected'; +} + +{ + my $ua = HTTP::Tiny->new(timeout => 10); + is $ua->timeout, 10, 'timeout is handled as a constructor param'; +} + +{ + my $ua = HTTP::Tiny->new(timeout => 0); + is $ua->timeout, 0, 'constructor arg of timeout=0 is passed through'; +} + +{ + my $ua = HTTP::Tiny->new(timeout => undef); + is $ua->timeout, $default, 'constructor arg of timeout=undef is ignored'; +} + +{ + my $ua = HTTP::Tiny->new(); + $ua->timeout(15); + is $ua->timeout, 15, 'timeout works as expected as a r/w attribute'; +} diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/020_headers.t new/HTTP-Tiny-0.064/t/020_headers.t --- old/HTTP-Tiny-0.058/t/020_headers.t 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/020_headers.t 2016-08-17 03:38:12.000000000 +0200 @@ -4,7 +4,8 @@ use warnings; use Test::More qw[no_plan]; -use t::Util qw[tmpfile rewind $CRLF $LF]; +use lib 't'; +use Util qw[tmpfile rewind $CRLF $LF]; use HTTP::Tiny; { diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/030_response.t new/HTTP-Tiny-0.064/t/030_response.t --- old/HTTP-Tiny-0.058/t/030_response.t 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/030_response.t 2016-08-17 03:38:12.000000000 +0200 @@ -4,7 +4,8 @@ use warnings; use Test::More qw[no_plan]; -use t::Util qw[tmpfile rewind $CRLF $LF]; +use lib 't'; +use Util qw[tmpfile rewind $CRLF $LF]; use HTTP::Tiny; sub _header { diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/040_content.t new/HTTP-Tiny-0.064/t/040_content.t --- old/HTTP-Tiny-0.058/t/040_content.t 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/040_content.t 2016-08-17 03:38:12.000000000 +0200 @@ -4,7 +4,8 @@ use warnings; use Test::More qw[no_plan]; -use t::Util qw[tmpfile rewind $CRLF $LF]; +use lib 't'; +use Util qw[tmpfile rewind $CRLF $LF]; use HTTP::Tiny; { diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/050_chunked_body.t new/HTTP-Tiny-0.064/t/050_chunked_body.t --- old/HTTP-Tiny-0.058/t/050_chunked_body.t 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/050_chunked_body.t 2016-08-17 03:38:12.000000000 +0200 @@ -4,7 +4,8 @@ use warnings; use Test::More qw[no_plan]; -use t::Util qw[tmpfile rewind $CRLF]; +use lib 't'; +use Util qw[tmpfile rewind $CRLF]; use HTTP::Tiny; { @@ -14,16 +15,29 @@ } { - my $body = join($CRLF, map { sprintf('%x', length $_) . $CRLF . $_ } 'A'..'Z', '') . $CRLF; - my $fh = tmpfile($body); + my $fh = tmpfile(); my $handle = HTTP::Tiny::Handle->new(fh => $fh); - my $exp = ['A'..'Z']; - my $got = []; - my $cb = sub { push @$got, $_[0] }; - my $response = { headers => {} }; - $handle->read_chunked_body($cb, $response); - is_deeply($response->{headers}, {}, 'chunked trailers'); - is_deeply($got, $exp, "chunked chunks"); + + my $exp = ['A'..'Z']; + my $got = []; + + { + my @chunks = @$exp; + my $request = { + cb => sub { shift @chunks }, + }; + $handle->write_chunked_body($request); + } + + rewind($fh); + + { + my $cb = sub { push @$got, $_[0] }; + my $response = { headers => {} }; + $handle->read_chunked_body($cb, $response); + } + + is_deeply($got, $exp, "roundtrip chunked chunks w/o trailers"); } { @@ -52,7 +66,7 @@ is_deeply($response->{headers}, $trailers, 'roundtrip chunked trailers'); } - is_deeply($got, $exp, "roundtrip chunked chunks"); + is_deeply($got, $exp, "roundtrip chunked chunks (with trailers)"); } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/070_cookie_jar.t new/HTTP-Tiny-0.064/t/070_cookie_jar.t --- old/HTTP-Tiny-0.058/t/070_cookie_jar.t 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/070_cookie_jar.t 2016-08-17 03:38:12.000000000 +0200 @@ -4,8 +4,9 @@ use warnings; use Test::More tests => 4; -use t::SimpleCookieJar; -use t::BrokenCookieJar; +use lib 't'; +use SimpleCookieJar; +use BrokenCookieJar; use HTTP::Tiny; ### a couple tests to ensure that: @@ -15,9 +16,9 @@ my $default = undef; -my $jar = t::SimpleCookieJar->new(); -my $mug = t::BrokenCookieJar->new(); -my $dog = t::BrokenCookieJar2->new(); +my $jar = SimpleCookieJar->new(); +my $mug = BrokenCookieJar->new(); +my $dog = BrokenCookieJar2->new(); { my $ua = HTTP::Tiny->new(); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/100_get.t new/HTTP-Tiny-0.064/t/100_get.t --- old/HTTP-Tiny-0.058/t/100_get.t 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/100_get.t 2016-08-17 03:38:12.000000000 +0200 @@ -5,7 +5,8 @@ use File::Basename; use Test::More 0.88; -use t::Util qw[tmpfile rewind slurp monkey_patch dir_list parse_case +use lib 't'; +use Util qw[tmpfile rewind slurp monkey_patch dir_list parse_case hashify connect_args set_socket_source sort_headers $CRLF $LF]; use HTTP::Tiny; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/101_head.t new/HTTP-Tiny-0.064/t/101_head.t --- old/HTTP-Tiny-0.058/t/101_head.t 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/101_head.t 2016-08-17 03:38:12.000000000 +0200 @@ -5,7 +5,8 @@ use File::Basename; use Test::More 0.88; -use t::Util qw[tmpfile rewind slurp monkey_patch dir_list parse_case +use lib 't'; +use Util qw[tmpfile rewind slurp monkey_patch dir_list parse_case set_socket_source sort_headers $CRLF $LF]; use HTTP::Tiny; BEGIN { monkey_patch() } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/102_put.t new/HTTP-Tiny-0.064/t/102_put.t --- old/HTTP-Tiny-0.058/t/102_put.t 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/102_put.t 2016-08-17 03:38:12.000000000 +0200 @@ -5,7 +5,8 @@ use File::Basename; use Test::More 0.88; -use t::Util qw[tmpfile rewind slurp monkey_patch dir_list parse_case +use lib 't'; +use Util qw[tmpfile rewind slurp monkey_patch dir_list parse_case set_socket_source sort_headers $CRLF $LF]; use HTTP::Tiny; BEGIN { monkey_patch() } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/103_delete.t new/HTTP-Tiny-0.064/t/103_delete.t --- old/HTTP-Tiny-0.058/t/103_delete.t 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/103_delete.t 2016-08-17 03:38:12.000000000 +0200 @@ -5,7 +5,8 @@ use File::Basename; use Test::More 0.88; -use t::Util qw[tmpfile rewind slurp monkey_patch dir_list parse_case +use lib 't'; +use Util qw[tmpfile rewind slurp monkey_patch dir_list parse_case set_socket_source sort_headers $CRLF $LF]; use HTTP::Tiny; BEGIN { monkey_patch() } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/104_post.t new/HTTP-Tiny-0.064/t/104_post.t --- old/HTTP-Tiny-0.058/t/104_post.t 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/104_post.t 2016-08-17 03:38:12.000000000 +0200 @@ -5,7 +5,8 @@ use File::Basename; use Test::More 0.88; -use t::Util qw[tmpfile rewind slurp monkey_patch dir_list parse_case +use lib 't'; +use Util qw[tmpfile rewind slurp monkey_patch dir_list parse_case set_socket_source sort_headers $CRLF $LF]; use HTTP::Tiny; BEGIN { monkey_patch() } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/110_mirror.t new/HTTP-Tiny-0.064/t/110_mirror.t --- old/HTTP-Tiny-0.058/t/110_mirror.t 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/110_mirror.t 2016-08-17 03:38:12.000000000 +0200 @@ -5,7 +5,8 @@ use File::Basename; use Test::More 0.88; -use t::Util qw[tmpfile rewind slurp monkey_patch dir_list parse_case +use lib 't'; +use Util qw[tmpfile rewind slurp monkey_patch dir_list parse_case set_socket_source sort_headers $CRLF $LF]; use HTTP::Tiny; use File::Temp qw/tempdir/; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/130_redirect.t new/HTTP-Tiny-0.064/t/130_redirect.t --- old/HTTP-Tiny-0.058/t/130_redirect.t 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/130_redirect.t 2016-08-17 03:38:12.000000000 +0200 @@ -5,7 +5,8 @@ use File::Basename; use Test::More 0.88; -use t::Util qw[tmpfile rewind slurp monkey_patch dir_list parse_case +use lib 't'; +use Util qw[tmpfile rewind slurp monkey_patch dir_list parse_case hashify connect_args clear_socket_source set_socket_source sort_headers $CRLF $LF]; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/140_proxy.t new/HTTP-Tiny-0.064/t/140_proxy.t --- old/HTTP-Tiny-0.058/t/140_proxy.t 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/140_proxy.t 2016-08-17 03:38:12.000000000 +0200 @@ -6,7 +6,8 @@ use File::Basename; use Test::More 0.88; -use t::Util qw[ monkey_patch ]; +use lib 't'; +use Util qw[ monkey_patch ]; use HTTP::Tiny; BEGIN { diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/150_post_form.t new/HTTP-Tiny-0.064/t/150_post_form.t --- old/HTTP-Tiny-0.058/t/150_post_form.t 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/150_post_form.t 2016-08-17 03:38:12.000000000 +0200 @@ -6,13 +6,15 @@ use File::Basename; use Test::More 0.88; -use t::Util qw[tmpfile rewind slurp monkey_patch dir_list parse_case +use lib 't'; +use Util qw[tmpfile rewind slurp monkey_patch dir_list parse_case set_socket_source sort_headers $CRLF $LF]; use HTTP::Tiny; BEGIN { monkey_patch() } for my $file ( dir_list("corpus", qr/^form/ ) ) { my $data = do { local (@ARGV,$/) = $file; <> }; + $data =~ s/$CRLF/$LF/gm if $^O eq 'MSWin32'; my ($params, $expect_req, $give_res) = split /--+\n/, $data; # cleanup source data my $version = HTTP::Tiny->VERSION || 0; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/160_cookies.t new/HTTP-Tiny-0.064/t/160_cookies.t --- old/HTTP-Tiny-0.058/t/160_cookies.t 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/160_cookies.t 2016-08-17 03:38:12.000000000 +0200 @@ -5,14 +5,15 @@ use File::Basename; use Test::More 0.96; -use t::Util qw[tmpfile rewind slurp monkey_patch dir_list parse_case +use lib 't'; +use Util qw[tmpfile rewind slurp monkey_patch dir_list parse_case hashify connect_args clear_socket_source set_socket_source sort_headers $CRLF $LF]; use HTTP::Tiny; BEGIN { monkey_patch() } -SKIP: for my $class ( qw/t::SimpleCookieJar HTTP::CookieJar/ ) { +SKIP: for my $class ( qw/SimpleCookieJar HTTP::CookieJar/ ) { subtest $class => sub { eval "require $class; 1" @@ -23,7 +24,7 @@ my $data = do { local (@ARGV,$/) = $file; <> }; my @cases = split /--+\n/, $data; - my $jar = t::SimpleCookieJar->new(); + my $jar = SimpleCookieJar->new(); my $http = undef; while (@cases) { my ($params, $expect_req, $give_res) = splice( @cases, 0, 3 ); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/161_basic_auth.t new/HTTP-Tiny-0.064/t/161_basic_auth.t --- old/HTTP-Tiny-0.058/t/161_basic_auth.t 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/161_basic_auth.t 2016-08-17 03:38:12.000000000 +0200 @@ -5,7 +5,8 @@ use File::Basename; use Test::More 0.88; -use t::Util qw[tmpfile rewind slurp monkey_patch dir_list parse_case +use lib 't'; +use Util qw[tmpfile rewind slurp monkey_patch dir_list parse_case hashify connect_args clear_socket_source set_socket_source sort_headers $CRLF $LF]; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/162_proxy_auth.t new/HTTP-Tiny-0.064/t/162_proxy_auth.t --- old/HTTP-Tiny-0.058/t/162_proxy_auth.t 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/162_proxy_auth.t 2016-08-17 03:38:12.000000000 +0200 @@ -5,7 +5,8 @@ use File::Basename; use Test::More 0.88; -use t::Util qw[tmpfile rewind slurp monkey_patch dir_list parse_case +use lib 't'; +use Util qw[tmpfile rewind slurp monkey_patch dir_list parse_case hashify connect_args clear_socket_source set_socket_source sort_headers $CRLF $LF]; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/170_keepalive.t new/HTTP-Tiny-0.064/t/170_keepalive.t --- old/HTTP-Tiny-0.058/t/170_keepalive.t 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/170_keepalive.t 2016-08-17 03:38:12.000000000 +0200 @@ -4,7 +4,8 @@ use warnings; use File::Basename; use Test::More 0.88; -use t::Util qw[ +use lib 't'; +use Util qw[ tmpfile monkey_patch dir_list clear_socket_source set_socket_source $CRLF ]; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/BrokenCookieJar.pm new/HTTP-Tiny-0.064/t/BrokenCookieJar.pm --- old/HTTP-Tiny-0.058/t/BrokenCookieJar.pm 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/BrokenCookieJar.pm 2016-08-17 03:38:12.000000000 +0200 @@ -1,4 +1,4 @@ -package t::BrokenCookieJar; +package BrokenCookieJar; use strict; use warnings; @@ -8,7 +8,7 @@ return bless {} => $class; } -package t::BrokenCookieJar2; +package BrokenCookieJar2; use strict; use warnings; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/SimpleCookieJar.pm new/HTTP-Tiny-0.064/t/SimpleCookieJar.pm --- old/HTTP-Tiny-0.058/t/SimpleCookieJar.pm 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/SimpleCookieJar.pm 2016-08-17 03:38:12.000000000 +0200 @@ -1,4 +1,4 @@ -package t::SimpleCookieJar; +package SimpleCookieJar; use strict; use warnings; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/t/Util.pm new/HTTP-Tiny-0.064/t/Util.pm --- old/HTTP-Tiny-0.058/t/Util.pm 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/t/Util.pm 2016-08-17 03:38:12.000000000 +0200 @@ -1,4 +1,4 @@ -package t::Util; +package Util; use strict; use warnings; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/xt/author/pod-spell.t new/HTTP-Tiny-0.064/xt/author/pod-spell.t --- old/HTTP-Tiny-0.058/xt/author/pod-spell.t 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/xt/author/pod-spell.t 2016-08-17 03:38:12.000000000 +0200 @@ -2,7 +2,7 @@ use warnings; use Test::More; -# generated by Dist::Zilla::Plugin::Test::PodSpelling 2.007000 +# generated by Dist::Zilla::Plugin::Test::PodSpelling 2.007002 use Test::Spelling 0.12; use Pod::Wordlist; @@ -62,6 +62,9 @@ Jess Robinson castaway +Karen +Etheridge +ether Lukas Eklund leklund @@ -87,6 +90,9 @@ Sören Kornetzki soeren +Steve +Grazzini +steve Syohei YOSHIDA syohex diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/xt/author/portability.t new/HTTP-Tiny-0.064/xt/author/portability.t --- old/HTTP-Tiny-0.058/xt/author/portability.t 1970-01-01 01:00:00.000000000 +0100 +++ new/HTTP-Tiny-0.064/xt/author/portability.t 2016-08-17 03:38:12.000000000 +0200 @@ -0,0 +1,10 @@ +use strict; +use warnings; + +use Test::More; + +eval 'use Test::Portability::Files'; +plan skip_all => 'Test::Portability::Files required for testing portability' + if $@; +options(test_one_dot => 0); +run_tests(); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/xt/author/test-version.t new/HTTP-Tiny-0.064/xt/author/test-version.t --- old/HTTP-Tiny-0.058/xt/author/test-version.t 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/xt/author/test-version.t 2016-08-17 03:38:12.000000000 +0200 @@ -2,7 +2,7 @@ use warnings; use Test::More; -# generated by Dist::Zilla::Plugin::Test::Version 1.07 +# generated by Dist::Zilla::Plugin::Test::Version 1.09 use Test::Version; my @imports = qw( version_all_ok ); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTTP-Tiny-0.058/xt/release/portability.t new/HTTP-Tiny-0.064/xt/release/portability.t --- old/HTTP-Tiny-0.058/xt/release/portability.t 2016-05-03 17:30:06.000000000 +0200 +++ new/HTTP-Tiny-0.064/xt/release/portability.t 1970-01-01 01:00:00.000000000 +0100 @@ -1,12 +0,0 @@ -#!perl - -use strict; -use warnings; - -use Test::More; - -eval 'use Test::Portability::Files'; -plan skip_all => 'Test::Portability::Files required for testing portability' - if $@; -options(test_one_dot => 0); -run_tests();