Skip to content

Commit

Permalink
Checking in changes prior to tagging of version 2.12.
Browse files Browse the repository at this point in the history
Changelog diff is:

diff --git Changes Changes
index d96882d..2c5eb49 100644
--- Changes
+++ Changes
@@ -2,6 +2,11 @@ Revision history for Perl module Test::TCP

 {{$NEXT}}

+2.12 2015-05-18T08:14:30Z
+
+    - Fixed spelling mistake
+      (Reported by gregor herrmann)
+
 2.11 2015-04-07T00:07:25Z
     - declare IO::Socket::IP as dependency #36
  • Loading branch information
tokuhirom committed May 18, 2015
1 parent 1b3a941 commit de19eb7
Show file tree
Hide file tree
Showing 5 changed files with 59 additions and 31 deletions.
5 changes: 5 additions & 0 deletions Changes
Expand Up @@ -2,6 +2,11 @@ Revision history for Perl module Test::TCP

{{$NEXT}}

2.12 2015-05-18T08:14:30Z

- Fixed spelling mistake
(Reported by gregor herrmann)

2.11 2015-04-07T00:07:25Z
- declare IO::Socket::IP as dependency #36

Expand Down
6 changes: 3 additions & 3 deletions META.json
Expand Up @@ -4,7 +4,7 @@
"Tokuhiro Matsuno <tokuhirom@gmail.com>"
],
"dynamic_config" : 0,
"generated_by" : "Minilla/v2.3.0, CPAN::Meta::Converter version 2.150001",
"generated_by" : "Minilla/v2.4.1, CPAN::Meta::Converter version 2.150001",
"license" : [
"perl_5"
],
Expand All @@ -28,7 +28,7 @@
"prereqs" : {
"configure" : {
"requires" : {
"ExtUtils::MakeMaker" : "6.64"
"ExtUtils::MakeMaker" : "0"
}
},
"develop" : {
Expand Down Expand Up @@ -73,7 +73,7 @@
"web" : "https://github.com/tokuhirom/Test-TCP"
}
},
"version" : "2.11",
"version" : "2.12",
"x_contributors" : [
"tokuhirom <tokuhirom@d0d07461-0603-4401-acd4-de1884942a52>",
"mattn <mattn@d0d07461-0603-4401-acd4-de1884942a52>",
Expand Down
75 changes: 49 additions & 26 deletions Makefile.PL
Expand Up @@ -9,37 +9,60 @@ use strict;
use ExtUtils::MakeMaker;


use File::Copy;

print "cp META.json MYMETA.json\n";
copy("META.json","MYMETA.json") or die "Copy failed(META.json): $!";
my %WriteMakefileArgs = (
NAME => 'Test::TCP',
DISTNAME => 'Test-TCP',
VERSION => '2.12',
CONFIGURE_REQUIRES => {
"ExtUtils::MakeMaker" => 0
}
,
BUILD_REQUIRES => {}
,
TEST_REQUIRES => {
"File::Temp" => 0,
"Socket" => 0,
"Test::More" => "0.98"
}
,
PREREQ_PM => {
"IO::Socket::INET" => 0,
"IO::Socket::IP" => 0,
"Test::More" => 0,
"Test::SharedFork" => "0.29",
"Time::HiRes" => 0,
"perl" => "5.008001"
}
,
);

if (-f 'META.yml') {
print "cp META.yml MYMETA.yml\n";
copy("META.yml","MYMETA.yml") or die "Copy failed(META.yml): $!";
} else {
print "There is no META.yml... You may install this module from the repository...\n";
my $full_prereqs = {
"ExtUtils::MakeMaker" => 0,
"File::Temp" => 0,
"IO::Socket::INET" => 0,
"IO::Socket::IP" => 0,
"Socket" => 0,
"Test::More" => "0.98",
"Test::SharedFork" => "0.29",
"Time::HiRes" => 0,
"perl" => "5.008001"
}
;

my %args;
if ($ExtUtils::MakeMaker::VERSION >= 6.64) {
# *_REQUIRES was supported.
unless (eval { ExtUtils::MakeMaker->VERSION(6.63_03) }) {
delete $WriteMakefileArgs{TEST_REQUIRES};
delete $WriteMakefileArgs{BUILD_REQUIRES};
$WriteMakefileArgs{PREREQ_PM} = $full_prereqs;
}

$args{CONFIGURE_REQUIRES} = {"ExtUtils::MakeMaker" => "6.64"};
$args{BUILD_REQUIRES} = {};
$args{TEST_REQUIRES} = {"File::Temp" => 0,"Socket" => 0,"Test::More" => "0.98"};
$args{PREREQ_PM} = {"IO::Socket::INET" => 0,"IO::Socket::IP" => 0,"Test::More" => 0,"Test::SharedFork" => "0.29","Time::HiRes" => 0,"perl" => "5.008001"};
} else {
$args{PREREQ_PM} = {"ExtUtils::MakeMaker" => "6.64","File::Temp" => 0,"IO::Socket::INET" => 0,"IO::Socket::IP" => 0,"Socket" => 0,"Test::More" => "0.98","Test::SharedFork" => "0.29","Time::HiRes" => 0,"perl" => "5.008001"};
unless (eval { ExtUtils::MakeMaker->VERSION(6.52) }) {
delete $WriteMakefileArgs{CONFIGURE_REQUIRES};
}

if ($ExtUtils::MakeMaker::VERSION >= 6.57_01) {
$args{NO_MYMETA} = 1;
unless (eval { ExtUtils::MakeMaker->VERSION(6.57_01) }) {
use File::Copy;
copy('META.yml', 'MYMETA.yml') or warn "META.yml: $!";
copy('META.json', 'MYMETA.json') or warn "META.json: $!";
}

WriteMakefile(
NAME => 'Test::TCP',
DISTNAME => 'Test-TCP',
VERSION => '2.11',
%args,
);
WriteMakefile(%WriteMakefileArgs);
2 changes: 1 addition & 1 deletion README.md
Expand Up @@ -191,7 +191,7 @@ Test::TCP is test utilities for TCP/IP programs.

- How do I use address other than "127.0.0.1" for testing?

You can use the `host` paramater to specify the bind address.
You can use the `host` parameter to specify the bind address.

# let the server bind to "0.0.0.0" for testing
test_tcp(
Expand Down
2 changes: 1 addition & 1 deletion lib/Test/TCP.pm
Expand Up @@ -2,7 +2,7 @@ package Test::TCP;
use strict;
use warnings;
use 5.00800;
our $VERSION = '2.11';
our $VERSION = '2.12';
use base qw/Exporter/;
use IO::Socket::INET;
use Test::SharedFork 0.12;
Expand Down

0 comments on commit de19eb7

Please sign in to comment.