In perl.git, the branch blead has been updated
<http://perl5.git.perl.org/perl.git/commitdiff/44de791afe7466121840ad5d8e4a0b7694f4c34e?hp=377157fd699f058398b744427e3a6b43c71637ef>
- Log -----------------------------------------------------------------
commit 44de791afe7466121840ad5d8e4a0b7694f4c34e
Author: David Golden <dagol...@cpan.org>
Date: Fri Feb 4 02:51:14 2011 -0500
Updated HTTP::Tiny to CPAN version 0.010
Includes VMS test fixes by Craig Berry
-----------------------------------------------------------------------
Summary of changes:
Porting/Maintainers.pl | 2 +-
cpan/HTTP-Tiny/lib/HTTP/Tiny.pm | 21 +++++++++++++++++++--
cpan/HTTP-Tiny/t/110_mirror.t | 5 +++--
cpan/HTTP-Tiny/t/Util.pm | 8 ++++++--
pod/perldelta.pod | 4 ++++
5 files changed, 33 insertions(+), 7 deletions(-)
diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl
index 71fd082..ec0c275 100755
--- a/Porting/Maintainers.pl
+++ b/Porting/Maintainers.pl
@@ -768,7 +768,7 @@ use File::Glob qw(:case);
'HTTP::Tiny' =>
{
'MAINTAINER' => 'dagolden',
- 'DISTRIBUTION' => 'DAGOLDEN/HTTP-Tiny-0.009.tar.gz',
+ 'DISTRIBUTION' => 'DAGOLDEN/HTTP-Tiny-0.010.tar.gz',
'FILES' => q[cpan/HTTP-Tiny],
'EXCLUDED' => [
't/200_live.t',
diff --git a/cpan/HTTP-Tiny/lib/HTTP/Tiny.pm b/cpan/HTTP-Tiny/lib/HTTP/Tiny.pm
index 4686fe8..55912ff 100644
--- a/cpan/HTTP-Tiny/lib/HTTP/Tiny.pm
+++ b/cpan/HTTP-Tiny/lib/HTTP/Tiny.pm
@@ -9,7 +9,7 @@
#
package HTTP::Tiny;
BEGIN {
- $HTTP::Tiny::VERSION = '0.009';
+ $HTTP::Tiny::VERSION = '0.010';
}
use strict;
use warnings;
@@ -759,7 +759,7 @@ HTTP::Tiny - A small, simple, correct HTTP/1.1 client
=head1 VERSION
-version 0.009
+version 0.010
=head1 SYNOPSIS
@@ -1051,6 +1051,23 @@ L<LWP::UserAgent>
=back
+=for :stopwords CPAN AnnoCPAN RT CPANTS Kwalitee diff IRC
+
+=head1 SUPPORT
+
+=head2 Bugs / Feature Requests
+
+Please report any bugs or feature requests on the bugtracker website
L<http://rt.cpan.org/Public/Dist/Display.html?Name=HTTP-Tiny> or by email to
'bug-http-tiny at rt.cpan.org'. I will be notified, a ... [83 chars truncated]
+
+=head2 Source Code
+
+This is open source software. The code repository is available for
+public review and contribution under the terms of the license.
+
+L<http://github.com/dagolden/p5-http-tiny/tree>
+
+ git clone git://github.com/dagolden/p5-http-tiny.git
+
=head1 AUTHORS
=over 4
diff --git a/cpan/HTTP-Tiny/t/110_mirror.t b/cpan/HTTP-Tiny/t/110_mirror.t
index 34e0c90..7f10ff1 100644
--- a/cpan/HTTP-Tiny/t/110_mirror.t
+++ b/cpan/HTTP-Tiny/t/110_mirror.t
@@ -17,11 +17,12 @@ use t::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/;
+use File::Spec;
BEGIN { monkey_patch() }
my $tempdir = tempdir( TMPDIR => 1, CLEANUP => 1 );
-my $tempfile = $tempdir . "/tempfile.txt";
+my $tempfile = File::Spec->catfile( $tempdir, "tempfile.txt" );
my $known_epoch = 760233600;
my $day = 24*3600;
@@ -32,7 +33,7 @@ my %timestamp = (
);
for my $file ( dir_list("t/cases", qr/^mirror/ ) ) {
- unlink $tempfile;
+ 1 while unlink $tempfile;
my $data = do { local (@ARGV,$/) = $file; <> };
my ($params, $expect_req, $give_res) = split /--+\n/, $data;
# cleanup source data
diff --git a/cpan/HTTP-Tiny/t/Util.pm b/cpan/HTTP-Tiny/t/Util.pm
index f6c5f32..d049487 100644
--- a/cpan/HTTP-Tiny/t/Util.pm
+++ b/cpan/HTTP-Tiny/t/Util.pm
@@ -11,7 +11,7 @@ package t::Util;
use strict;
use warnings;
-use IO::File q[SEEK_SET];
+use IO::File qw(SEEK_SET SEEK_END);
use IO::Dir;
BEGIN {
@@ -72,12 +72,16 @@ sub dir_list {
sub slurp (*) {
my ($fh) = @_;
+ seek($fh, 0, SEEK_END)
+ || die(qq/Couldn't navigate to EOF on file handle: '$!'/);
+
+ my $exp = tell($fh);
+
rewind($fh);
binmode($fh)
|| die(qq/Couldn't binmode file handle: '$!'/);
- my $exp = -s $fh;
my $buf = do { local $/; <$fh> };
my $got = length $buf;
diff --git a/pod/perldelta.pod b/pod/perldelta.pod
index 6d2fe1d..b52960a 100644
--- a/pod/perldelta.pod
+++ b/pod/perldelta.pod
@@ -134,6 +134,10 @@ C<IPC::Cmd> has been upgraded from version 0.68 to 0.70
=item *
+C<HTTP::Tiny> has been upgraded from version 0.009 to 0.010
+
+=item *
+
C<Module::Build> has been upgraded from version 0.3607 to 0.3622.
A notable change is the deprecation of several modules.
--
Perl5 Master Repository
