Checking in changes prior to tagging of version 1.27.

Changelog diff is: diff --git a/Changes b/Changes index 3ad3673..1735cb7 100644 --- a/Changes +++ b/Changes @@ -2,6 +2,14 @@ Revision history for Perl extension Test::TCP {{$NEXT}} +1.27 2013-05-15T10:13:18Z + + - export wait_port from Net::EmptyPort + (Pavel Shaydo) + - Make default wait_port() sleeping time shorter. + 0.1sec => 0.0001sec. + (tokuhirom) + 1.26 2013-03-29T08:46:20Z - Remove unused deps from cpanfile.
kazeburo · May 15, 2013 · a4c9c95 · a4c9c95
1 parent 7b38de7
commit a4c9c95
Show file tree

Hide file tree

Showing 5 changed files with 37 additions and 13 deletions.
diff --git a/Changes b/Changes
@@ -2,6 +2,14 @@ Revision history for Perl extension Test::TCP
 
 {{$NEXT}}
 
+1.27 2013-05-15T10:13:18Z
+
+    - export wait_port from Net::EmptyPort
+      (Pavel Shaydo)
+    - Make default wait_port() sleeping time shorter.
+      0.1sec => 0.0001sec.
+      (tokuhirom)
+
 1.26 2013-03-29T08:46:20Z
 
     - Remove unused deps from cpanfile.

diff --git a/META.json b/META.json
@@ -25,11 +25,6 @@
       ]
    },
    "prereqs" : {
-      "build" : {
-         "requires" : {
-            "Test::More" : "0.98"
-         }
-      },
       "configure" : {
          "requires" : {
             "CPAN::Meta" : "0",
@@ -39,17 +34,28 @@
       },
       "develop" : {
          "requires" : {
+            "Perl::Critic" : "1.105",
             "Test::CPAN::Meta" : "0",
             "Test::MinimumVersion" : "0.10108",
+            "Test::Perl::Critic" : "1.02",
             "Test::Pod" : "1.41",
             "Test::Spellunker" : "v0.2.2"
          }
       },
       "runtime" : {
          "requires" : {
             "IO::Socket::INET" : "0",
+            "Test::More" : "0",
             "Test::SharedFork" : "0.19",
-            "perl" : "5.00800"
+            "Time::HiRes" : "0",
+            "perl" : "5.008001"
+         }
+      },
+      "test" : {
+         "requires" : {
+            "File::Temp" : "0",
+            "Socket" : "0",
+            "Test::More" : "0.98"
          }
       }
    },
@@ -65,7 +71,7 @@
          "web" : "https://github.com/tokuhirom/Test-TCP"
       }
    },
-   "version" : "1.26",
+   "version" : "1.27",
    "x_contributors" : [
       "tokuhirom <tokuhirom@d0d07461-0603-4401-acd4-de1884942a52>",
       "mattn <mattn@d0d07461-0603-4401-acd4-de1884942a52>",

diff --git a/cpanfile b/cpanfile
@@ -1,7 +1,17 @@
-requires 'perl', '5.00800';
+requires 'perl', 5.008_001;
 requires 'IO::Socket::INET';
 requires 'Test::SharedFork', '0.19';
+requires 'Test::More';
+requires 'Time::HiRes';
 
-on build => sub {
+on test => sub {
     requires 'Test::More', '0.98';
+    requires 'File::Temp';
+    requires 'Socket';
+};
+
+
+on develop => sub {
+    requires 'Perl::Critic', '1.105';
+    requires 'Test::Perl::Critic', '1.02';
 };
diff --git a/lib/Net/EmptyPort.pm b/lib/Net/EmptyPort.pm
@@ -112,7 +112,7 @@ Net::EmptyPort helps finding an empty TCP/UDP port.
 
 =over 4
 
-=item empty_port
+=item C<< empty_port() >>
 
     my $port = empty_port();
 
@@ -133,7 +133,7 @@ the second parameter:
     # use 49152..65535 range
     my $port = empty_port(undef, 'udp');
 
-=item check_port
+=item C<< check_port($port:Int) >>
 
     my $true_or_false = check_port(5000);
 
@@ -143,7 +143,7 @@ Also works for UDP:
 
     my $true_or_false = check_port(5000, 'udp');
 
-=item wait_port($port:Int[, $sleep:Number, $retry:Int, $proto:String])
+=item C<< wait_port($port:Int[, $sleep:Number, $retry:Int, $proto:String]) >>
 
 Waits for a particular port is available for connect.
 

diff --git a/lib/Test/TCP.pm b/lib/Test/TCP.pm
@@ -2,7 +2,7 @@ package Test::TCP;
 use strict;
 use warnings;
 use 5.00800;
-our $VERSION = '1.26';
+our $VERSION = '1.27';
 use base qw/Exporter/;
 use IO::Socket::INET;
 use Test::SharedFork 0.12;