Hello community,
here is the log from the commit of package perl-IO-Socket-Timeout for
openSUSE:Factory checked in at 2015-05-15 07:44:10
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-IO-Socket-Timeout (Old)
and /work/SRC/openSUSE:Factory/.perl-IO-Socket-Timeout.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-IO-Socket-Timeout"
Changes:
--------
---
/work/SRC/openSUSE:Factory/perl-IO-Socket-Timeout/perl-IO-Socket-Timeout.changes
2015-04-15 16:25:56.000000000 +0200
+++
/work/SRC/openSUSE:Factory/.perl-IO-Socket-Timeout.new/perl-IO-Socket-Timeout.changes
2015-05-15 07:44:38.000000000 +0200
@@ -1,0 +2,8 @@
+Wed May 13 12:33:21 UTC 2015 - [email protected]
+
+- updated to 0.28
+ see /usr/share/doc/packages/perl-IO-Socket-Timeout/Changes
+
+ 0.28 2015-05-12 20:36:28CEST+0200 Europe/Amsterdam
+
+-------------------------------------------------------------------
Old:
----
IO-Socket-Timeout-0.27.tar.gz
New:
----
IO-Socket-Timeout-0.28.tar.gz
cpanspec.yml
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-IO-Socket-Timeout.spec ++++++
--- /var/tmp/diff_new_pack.CcZT1d/_old 2015-05-15 07:44:39.000000000 +0200
+++ /var/tmp/diff_new_pack.CcZT1d/_new 2015-05-15 07:44:39.000000000 +0200
@@ -17,19 +17,20 @@
Name: perl-IO-Socket-Timeout
-Version: 0.27
+Version: 0.28
Release: 0
%define cpan_name IO-Socket-Timeout
Summary: IO::Socket with read/write timeout
License: Artistic-1.0 or GPL-1.0+
Group: Development/Libraries/Perl
Url: http://search.cpan.org/dist/IO-Socket-Timeout/
-Source:
http://www.cpan.org/authors/id/D/DA/DAMS/%{cpan_name}-%{version}.tar.gz
+Source0:
http://www.cpan.org/authors/id/D/DA/DAMS/%{cpan_name}-%{version}.tar.gz
+Source1: cpanspec.yml
BuildArch: noarch
BuildRoot: %{_tmppath}/%{name}-%{version}-build
BuildRequires: perl
BuildRequires: perl-macros
-BuildRequires: perl(Module::Build::Tiny) >= 0.036
+BuildRequires: perl(Module::Build::Tiny) >= 0.039
BuildRequires: perl(PerlIO::via::Timeout) >= 0.28
BuildRequires: perl(Test::TCP)
Requires: perl(PerlIO::via::Timeout) >= 0.28
++++++ IO-Socket-Timeout-0.27.tar.gz -> IO-Socket-Timeout-0.28.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/IO-Socket-Timeout-0.27/Build.PL
new/IO-Socket-Timeout-0.28/Build.PL
--- old/IO-Socket-Timeout-0.27/Build.PL 2014-07-30 11:38:01.000000000 +0200
+++ new/IO-Socket-Timeout-0.28/Build.PL 2015-05-12 20:36:32.000000000 +0200
@@ -1,3 +1,3 @@
use 5.006;
-use Module::Build::Tiny 0.036;
+use Module::Build::Tiny 0.039;
Build_PL();
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/IO-Socket-Timeout-0.27/Changes
new/IO-Socket-Timeout-0.28/Changes
--- old/IO-Socket-Timeout-0.27/Changes 2014-07-30 11:38:01.000000000 +0200
+++ new/IO-Socket-Timeout-0.28/Changes 2015-05-12 20:36:32.000000000 +0200
@@ -1,3 +1,5 @@
+0.28 2015-05-12 20:36:28CEST+0200 Europe/Amsterdam
+
0.27 2014-07-30 11:37:59 Europe/Amsterdam
0.26 2014-07-30 11:36:41 Europe/Amsterdam
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/IO-Socket-Timeout-0.27/MANIFEST
new/IO-Socket-Timeout-0.28/MANIFEST
--- old/IO-Socket-Timeout-0.27/MANIFEST 2014-07-30 11:38:01.000000000 +0200
+++ new/IO-Socket-Timeout-0.28/MANIFEST 2015-05-12 20:36:32.000000000 +0200
@@ -1,3 +1,4 @@
+# This file was automatically generated by Dist::Zilla::Plugin::Manifest
v5.032.
Build.PL
Changes
LICENSE
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/IO-Socket-Timeout-0.27/META.yml
new/IO-Socket-Timeout-0.28/META.yml
--- old/IO-Socket-Timeout-0.27/META.yml 2014-07-30 11:38:01.000000000 +0200
+++ new/IO-Socket-Timeout-0.28/META.yml 2015-05-12 20:36:32.000000000 +0200
@@ -9,10 +9,10 @@
Test::More: 0
Test::TCP: 0
configure_requires:
- ExtUtils::MakeMaker: 6.30
- Module::Build::Tiny: 0.036
+ ExtUtils::MakeMaker: 0
+ Module::Build::Tiny: 0.039
dynamic_config: 0
-generated_by: 'Dist::Zilla version 5.005, CPAN::Meta::Converter version
2.132830'
+generated_by: 'Dist::Zilla version 5.032, CPAN::Meta::Converter version
2.143240'
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -21,16 +21,16 @@
provides:
IO::Socket::Timeout:
file: lib/IO/Socket/Timeout.pm
- version: 0.27
+ version: 0.28
IO::Socket::Timeout::Role::PerlIO:
file: lib/IO/Socket/Timeout.pm
- version: 0.27
+ version: 0.28
IO::Socket::Timeout::Role::SetSockOpt:
file: lib/IO/Socket/Timeout.pm
- version: 0.27
+ version: 0.28
requires:
PerlIO::via::Timeout: 0.28
resources:
bugtracker: https://github.com/dams/io-socket-timeout/issues
repository: git://github.com/dams/io-socket-timeout.git
-version: 0.27
+version: 0.28
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/IO-Socket-Timeout-0.27/Makefile.PL
new/IO-Socket-Timeout-0.28/Makefile.PL
--- old/IO-Socket-Timeout-0.27/Makefile.PL 2014-07-30 11:38:01.000000000
+0200
+++ new/IO-Socket-Timeout-0.28/Makefile.PL 2015-05-12 20:36:32.000000000
+0200
@@ -1,6 +1,14 @@
+#
+# This file is part of IO-Socket-Timeout
+#
+# This software is copyright (c) 2013 by Damien "dams" Krotkine.
+#
+# This is free software; you can redistribute it and/or modify it under
+# the same terms as the Perl 5 programming language system itself.
+#
# This Makefile.PL for IO-Socket-Timeout was generated by
# Dist::Zilla::Plugin::MakeMaker::Fallback 0.005
-# and Dist::Zilla::Plugin::MakeMaker::Awesome 0.19.
+# and Dist::Zilla::Plugin::MakeMaker::Awesome 0.33.
# Don't edit it but the dist.ini and plugins used to construct it.
use strict;
@@ -8,8 +16,6 @@
BEGIN {
my %configure_requires = (
- 'Module::Build::Tiny' => '0.036',
- 'ExtUtils::MakeMaker' => '6.30',
);
my @missing = grep {
@@ -61,19 +67,14 @@
}
}
-
-
-use ExtUtils::MakeMaker 6.30;
-
-
+use ExtUtils::MakeMaker;
my %WriteMakefileArgs = (
"ABSTRACT" => "IO::Socket with read/write timeout",
"AUTHOR" => "Damien \"dams\" Krotkine",
- "BUILD_REQUIRES" => {},
"CONFIGURE_REQUIRES" => {
- "ExtUtils::MakeMaker" => "6.30",
- "Module::Build::Tiny" => "0.036"
+ "ExtUtils::MakeMaker" => 0,
+ "Module::Build::Tiny" => "0.039"
},
"DISTNAME" => "IO-Socket-Timeout",
"EXE_FILES" => [],
@@ -89,23 +90,23 @@
"Test::More" => 0,
"Test::TCP" => 0
},
- "VERSION" => "0.27",
+ "VERSION" => "0.28",
"test" => {
"TESTS" => "t/*.t"
}
);
-
my %FallbackPrereqs = (
+ "ExtUtils::MakeMaker" => 0,
"File::Spec" => 0,
"IO::Handle" => 0,
"IPC::Open3" => 0,
+ "Module::Build::Tiny" => "0.039",
"PerlIO::via::Timeout" => "0.28",
"Test::More" => 0,
"Test::TCP" => 0
);
-
unless ( eval { ExtUtils::MakeMaker->VERSION(6.63_03) } ) {
delete $WriteMakefileArgs{TEST_REQUIRES};
delete $WriteMakefileArgs{BUILD_REQUIRES};
@@ -116,6 +117,3 @@
unless eval { ExtUtils::MakeMaker->VERSION(6.52) };
WriteMakefile(%WriteMakefileArgs);
-
-
-
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/IO-Socket-Timeout-0.27/README
new/IO-Socket-Timeout-0.28/README
--- old/IO-Socket-Timeout-0.27/README 2014-07-30 11:38:01.000000000 +0200
+++ new/IO-Socket-Timeout-0.28/README 2015-05-12 20:36:32.000000000 +0200
@@ -1,7 +1,7 @@
This archive contains the distribution IO-Socket-Timeout,
-version 0.27:
+version 0.28:
IO::Socket with read/write timeout
@@ -11,3 +11,5 @@
the same terms as the Perl 5 programming language system itself.
+This README file was generated by Dist::Zilla::Plugin::Readme v5.032.
+
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/IO-Socket-Timeout-0.27/dist.ini
new/IO-Socket-Timeout-0.28/dist.ini
--- old/IO-Socket-Timeout-0.27/dist.ini 2014-07-30 11:38:01.000000000 +0200
+++ new/IO-Socket-Timeout-0.28/dist.ini 2015-05-12 20:36:32.000000000 +0200
@@ -17,7 +17,6 @@
; -- don't include this Makefile.PL in the dist
[PruneFiles]
-filenames = Makefile.PL
; -- tests
[Test::Compile]
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/IO-Socket-Timeout-0.27/lib/IO/Socket/Timeout.pm
new/IO-Socket-Timeout-0.28/lib/IO/Socket/Timeout.pm
--- old/IO-Socket-Timeout-0.27/lib/IO/Socket/Timeout.pm 2014-07-30
11:38:01.000000000 +0200
+++ new/IO-Socket-Timeout-0.28/lib/IO/Socket/Timeout.pm 2015-05-12
20:36:32.000000000 +0200
@@ -7,10 +7,7 @@
# the same terms as the Perl 5 programming language system itself.
#
package IO::Socket::Timeout;
-{
- $IO::Socket::Timeout::VERSION = '0.27';
-}
-
+$IO::Socket::Timeout::VERSION = '0.28';
use strict;
use warnings;
use Config;
@@ -77,8 +74,11 @@
# PerlIO::via::Timeout->READ calls sysread.
my $_prevent_deep_recursion;
*CORE::GLOBAL::sysread = sub {
- $_prevent_deep_recursion || !
PerlIO::via::Timeout->_fh2prop($_[0])->{timeout_enabled}
- and return CORE::sysread($_[0], $_[1], $_[2], $_[3]);
+ my $args_count = scalar(@_);
+ $_prevent_deep_recursion || !
(PerlIO::via::Timeout->_fh2prop($_[0]) || {})->{timeout_enabled}
+ and return ( $args_count == 4 ? CORE::sysread($_[0], $_[1],
$_[2], $_[3])
+ : CORE::sysread($_[0], $_[1],
$_[2])
+ );
$_prevent_deep_recursion = 1;
require PerlIO::via::Timeout;
my $ret_val = PerlIO::via::Timeout->READ($_[1], $_[2], $_[0]);
@@ -98,8 +98,12 @@
# PerlIO::via::Timeout->WRITE calls syswrite.
my $_prevent_deep_recursion;
*CORE::GLOBAL::syswrite = sub {
- $_prevent_deep_recursion || !
PerlIO::via::Timeout->_fh2prop($_[0])->{timeout_enabled}
- and return CORE::syswrite($_[0], $_[1], $_[2], $_[3]);
+ my $args_count = scalar(@_);
+ $_prevent_deep_recursion || !
(PerlIO::via::Timeout->_fh2prop($_[0]) || {})->{timeout_enabled}
+ and return( $args_count == 4 ? CORE::syswrite($_[0], $_[1],
$_[2], $_[3])
+ : $args_count == 3 ? CORE::syswrite($_[0], $_[1],
$_[2])
+ : CORE::syswrite($_[0], $_[1])
+ );
$_prevent_deep_recursion = 1;
require PerlIO::via::Timeout;
my $ret_val = PerlIO::via::Timeout->WRITE($_[1], $_[0]);
@@ -110,9 +114,7 @@
}
package IO::Socket::Timeout::Role::SetSockOpt;
-{
- $IO::Socket::Timeout::Role::SetSockOpt::VERSION = '0.27';
-}
+$IO::Socket::Timeout::Role::SetSockOpt::VERSION = '0.28';
use Carp;
use Socket;
@@ -170,9 +172,7 @@
}
package IO::Socket::Timeout::Role::PerlIO;
-{
- $IO::Socket::Timeout::Role::PerlIO::VERSION = '0.27';
-}
+$IO::Socket::Timeout::Role::PerlIO::VERSION = '0.28';
use PerlIO::via::Timeout;
sub read_timeout { goto &PerlIO::via::Timeout::read_timeout }
@@ -195,7 +195,7 @@
=head1 VERSION
-version 0.27
+version 0.28
=head1 SYNOPSIS
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/IO-Socket-Timeout-0.27/t/release-distmeta.t
new/IO-Socket-Timeout-0.28/t/release-distmeta.t
--- old/IO-Socket-Timeout-0.27/t/release-distmeta.t 2014-07-30
11:38:01.000000000 +0200
+++ new/IO-Socket-Timeout-0.28/t/release-distmeta.t 2015-05-12
20:36:32.000000000 +0200
@@ -15,9 +15,8 @@
}
}
+# This file was automatically generated by Dist::Zilla::Plugin::MetaTests.
-use Test::More;
+use Test::CPAN::Meta;
-eval "use Test::CPAN::Meta";
-plan skip_all => "Test::CPAN::Meta required for testing META.yml" if $@;
meta_yaml_ok();
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/IO-Socket-Timeout-0.27/t/release-pod-coverage.t
new/IO-Socket-Timeout-0.28/t/release-pod-coverage.t
--- old/IO-Socket-Timeout-0.27/t/release-pod-coverage.t 2014-07-30
11:38:01.000000000 +0200
+++ new/IO-Socket-Timeout-0.28/t/release-pod-coverage.t 2015-05-12
20:36:32.000000000 +0200
@@ -15,15 +15,9 @@
}
}
+# This file was automatically generated by
Dist::Zilla::Plugin::PodCoverageTests.
-use Test::More;
-
-eval "use Test::Pod::Coverage 1.08";
-plan skip_all => "Test::Pod::Coverage 1.08 required for testing POD coverage"
- if $@;
-
-eval "use Pod::Coverage::TrustPod";
-plan skip_all => "Pod::Coverage::TrustPod required for testing POD coverage"
- if $@;
+use Test::Pod::Coverage 1.08;
+use Pod::Coverage::TrustPod;
all_pod_coverage_ok({ coverage_class => 'Pod::Coverage::TrustPod' });
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/IO-Socket-Timeout-0.27/t/timeout.t
new/IO-Socket-Timeout-0.28/t/timeout.t
--- old/IO-Socket-Timeout-0.27/t/timeout.t 2014-07-30 11:38:01.000000000
+0200
+++ new/IO-Socket-Timeout-0.28/t/timeout.t 2015-05-12 20:36:32.000000000
+0200
@@ -70,5 +70,25 @@
);
};
+subtest 'test standard sysread/syswrite no timeout', sub {
+TestTimeout->test( connection_delay => 0,
+ read_delay => 0,
+ write_delay => 0,
+ no_timeouts => 1,
+ callback => sub {
+ my ($client) = @_;
+ ok ! $client->isa('IO::Socket::Timeout::Role::PerlIO'),
'client does not do PerlIO';
+ $client->print("OK\n");
+ sysread $client, my $response, 4;
+
+ is $response, "SOK\n", "got proper response 1";
+ $client->print("OK2\n");
+ $response = undef;
+ sysread $client, $response, 5;
+ is $response, "SOK2\n", "got proper response 2";
+ },
+ );
+};
+
done_testing;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/IO-Socket-Timeout-0.27/t/tlib/TestTimeout.pm
new/IO-Socket-Timeout-0.28/t/tlib/TestTimeout.pm
--- old/IO-Socket-Timeout-0.27/t/tlib/TestTimeout.pm 2014-07-30
11:38:01.000000000 +0200
+++ new/IO-Socket-Timeout-0.28/t/tlib/TestTimeout.pm 2015-05-12
20:36:32.000000000 +0200
@@ -70,10 +70,11 @@
PeerPort => $server->port,
$p{connection_timeout} ? (Timeout => $p{connection_timeout} ) : (),
);
- IO::Socket::Timeout->enable_timeouts_on($client);
- $p{read_timeout} and $client->read_timeout($p{read_timeout});
- $p{write_timeout} and $client->write_timeout($p{write_timeout});
-
+ if (! $p{no_timeouts} ) {
+ IO::Socket::Timeout->enable_timeouts_on($client);
+ $p{read_timeout} and $client->read_timeout($p{read_timeout});
+ $p{write_timeout} and $client->write_timeout($p{write_timeout});
+ }
my $etimeout = strerror(ETIMEDOUT);
my $ereset = strerror(ECONNRESET);
$p{callback}->($client, $etimeout, $ereset);
++++++ cpanspec.yml ++++++
---
#description_paragraphs: 3
#no_testing: broken upstream
#sources:
# - source1
# - source2
#patches:
# foo.patch: -p1
# bar.patch:
#preamble: |-
# BuildRequires: gcc-c++
#post_prep: |-
# hunspell=`pkg-config --libs hunspell | sed -e 's,-l,,; s, *,,g'`
# sed -i -e "s,hunspell-X,$hunspell," t/00-prereq.t Makefile.PL
#post_install: |-
# sed on %{name}.files
#license: SUSE-NonFree
#skip_noarch: 1
#custom_build: |-
#./Build build flags=%{?_smp_mflags} --myflag
#custom_test: |-
#startserver && make test
#ignore_requires: Bizarre::Module
