Hello community,
here is the log from the commit of package perl-IO-Socket-Timeout for
openSUSE:Factory checked in at 2015-06-15 17:50:15
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
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-05-15 07:44:38.000000000 +0200
+++
/work/SRC/openSUSE:Factory/.perl-IO-Socket-Timeout.new/perl-IO-Socket-Timeout.changes
2015-06-15 17:50:24.000000000 +0200
@@ -1,0 +2,8 @@
+Sun Jun 14 08:14:01 UTC 2015 - [email protected]
+
+- updated to 0.29
+ see /usr/share/doc/packages/perl-IO-Socket-Timeout/Changes
+
+ 0.29 2015-05-13 20:44:41CEST+0200 Europe/Amsterdam
+
+-------------------------------------------------------------------
Old:
----
IO-Socket-Timeout-0.28.tar.gz
New:
----
IO-Socket-Timeout-0.29.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-IO-Socket-Timeout.spec ++++++
--- /var/tmp/diff_new_pack.2kCO3K/_old 2015-06-15 17:50:25.000000000 +0200
+++ /var/tmp/diff_new_pack.2kCO3K/_new 2015-06-15 17:50:25.000000000 +0200
@@ -17,7 +17,7 @@
Name: perl-IO-Socket-Timeout
-Version: 0.28
+Version: 0.29
Release: 0
%define cpan_name IO-Socket-Timeout
Summary: IO::Socket with read/write timeout
@@ -31,9 +31,9 @@
BuildRequires: perl
BuildRequires: perl-macros
BuildRequires: perl(Module::Build::Tiny) >= 0.039
-BuildRequires: perl(PerlIO::via::Timeout) >= 0.28
+BuildRequires: perl(PerlIO::via::Timeout) >= 0.30
BuildRequires: perl(Test::TCP)
-Requires: perl(PerlIO::via::Timeout) >= 0.28
+Requires: perl(PerlIO::via::Timeout) >= 0.30
%{perl_requires}
%description
++++++ IO-Socket-Timeout-0.28.tar.gz -> IO-Socket-Timeout-0.29.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/IO-Socket-Timeout-0.28/Changes
new/IO-Socket-Timeout-0.29/Changes
--- old/IO-Socket-Timeout-0.28/Changes 2015-05-12 20:36:32.000000000 +0200
+++ new/IO-Socket-Timeout-0.29/Changes 2015-05-13 20:44:45.000000000 +0200
@@ -1,3 +1,5 @@
+0.29 2015-05-13 20:44:41CEST+0200 Europe/Amsterdam
+
0.28 2015-05-12 20:36:28CEST+0200 Europe/Amsterdam
0.27 2014-07-30 11:37:59 Europe/Amsterdam
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/IO-Socket-Timeout-0.28/META.yml
new/IO-Socket-Timeout-0.29/META.yml
--- old/IO-Socket-Timeout-0.28/META.yml 2015-05-12 20:36:32.000000000 +0200
+++ new/IO-Socket-Timeout-0.29/META.yml 2015-05-13 20:44:45.000000000 +0200
@@ -21,16 +21,16 @@
provides:
IO::Socket::Timeout:
file: lib/IO/Socket/Timeout.pm
- version: 0.28
+ version: 0.29
IO::Socket::Timeout::Role::PerlIO:
file: lib/IO/Socket/Timeout.pm
- version: 0.28
+ version: 0.29
IO::Socket::Timeout::Role::SetSockOpt:
file: lib/IO/Socket/Timeout.pm
- version: 0.28
+ version: 0.29
requires:
- PerlIO::via::Timeout: 0.28
+ PerlIO::via::Timeout: 0.30
resources:
bugtracker: https://github.com/dams/io-socket-timeout/issues
repository: git://github.com/dams/io-socket-timeout.git
-version: 0.28
+version: 0.29
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/IO-Socket-Timeout-0.28/Makefile.PL
new/IO-Socket-Timeout-0.29/Makefile.PL
--- old/IO-Socket-Timeout-0.28/Makefile.PL 2015-05-12 20:36:32.000000000
+0200
+++ new/IO-Socket-Timeout-0.29/Makefile.PL 2015-05-13 20:44:45.000000000
+0200
@@ -81,7 +81,7 @@
"LICENSE" => "perl",
"NAME" => "IO::Socket::Timeout",
"PREREQ_PM" => {
- "PerlIO::via::Timeout" => "0.28"
+ "PerlIO::via::Timeout" => "0.30"
},
"TEST_REQUIRES" => {
"File::Spec" => 0,
@@ -90,7 +90,7 @@
"Test::More" => 0,
"Test::TCP" => 0
},
- "VERSION" => "0.28",
+ "VERSION" => "0.29",
"test" => {
"TESTS" => "t/*.t"
}
@@ -102,7 +102,7 @@
"IO::Handle" => 0,
"IPC::Open3" => 0,
"Module::Build::Tiny" => "0.039",
- "PerlIO::via::Timeout" => "0.28",
+ "PerlIO::via::Timeout" => "0.30",
"Test::More" => 0,
"Test::TCP" => 0
);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/IO-Socket-Timeout-0.28/README
new/IO-Socket-Timeout-0.29/README
--- old/IO-Socket-Timeout-0.28/README 2015-05-12 20:36:32.000000000 +0200
+++ new/IO-Socket-Timeout-0.29/README 2015-05-13 20:44:45.000000000 +0200
@@ -1,7 +1,7 @@
This archive contains the distribution IO-Socket-Timeout,
-version 0.28:
+version 0.29:
IO::Socket with read/write timeout
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/IO-Socket-Timeout-0.28/dist.ini
new/IO-Socket-Timeout-0.29/dist.ini
--- old/IO-Socket-Timeout-0.28/dist.ini 2015-05-12 20:36:32.000000000 +0200
+++ new/IO-Socket-Timeout-0.29/dist.ini 2015-05-13 20:44:45.000000000 +0200
@@ -15,7 +15,6 @@
; -- fetch & generate files
[GatherDir]
-; -- don't include this Makefile.PL in the dist
[PruneFiles]
; -- tests
@@ -31,7 +30,7 @@
; -- dependencies
[Prereqs]
-PerlIO::via::Timeout = 0.28
+PerlIO::via::Timeout = 0.30
; -- test dependencies
[Prereqs / TestRequires]
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/IO-Socket-Timeout-0.28/lib/IO/Socket/Timeout.pm
new/IO-Socket-Timeout-0.29/lib/IO/Socket/Timeout.pm
--- old/IO-Socket-Timeout-0.28/lib/IO/Socket/Timeout.pm 2015-05-12
20:36:32.000000000 +0200
+++ new/IO-Socket-Timeout-0.29/lib/IO/Socket/Timeout.pm 2015-05-13
20:44:45.000000000 +0200
@@ -7,7 +7,7 @@
# the same terms as the Perl 5 programming language system itself.
#
package IO::Socket::Timeout;
-$IO::Socket::Timeout::VERSION = '0.28';
+$IO::Socket::Timeout::VERSION = '0.29';
use strict;
use warnings;
use Config;
@@ -75,12 +75,13 @@
my $_prevent_deep_recursion;
*CORE::GLOBAL::sysread = sub {
my $args_count = scalar(@_);
- $_prevent_deep_recursion || !
(PerlIO::via::Timeout->_fh2prop($_[0]) || {})->{timeout_enabled}
+ $_prevent_deep_recursion
+ || ! PerlIO::via::Timeout::has_timeout_layer($_[0])
+ || ! PerlIO::via::Timeout::timeout_enabled($_[0])
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]);
$_prevent_deep_recursion = 0;
return $ret_val;
@@ -99,13 +100,14 @@
my $_prevent_deep_recursion;
*CORE::GLOBAL::syswrite = sub {
my $args_count = scalar(@_);
- $_prevent_deep_recursion || !
(PerlIO::via::Timeout->_fh2prop($_[0]) || {})->{timeout_enabled}
+ $_prevent_deep_recursion
+ || ! PerlIO::via::Timeout::has_timeout_layer($_[0])
+ || ! PerlIO::via::Timeout::timeout_enabled($_[0])
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]);
$_prevent_deep_recursion = 0;
return $ret_val;
@@ -114,7 +116,7 @@
}
package IO::Socket::Timeout::Role::SetSockOpt;
-$IO::Socket::Timeout::Role::SetSockOpt::VERSION = '0.28';
+$IO::Socket::Timeout::Role::SetSockOpt::VERSION = '0.29';
use Carp;
use Socket;
@@ -172,7 +174,7 @@
}
package IO::Socket::Timeout::Role::PerlIO;
-$IO::Socket::Timeout::Role::PerlIO::VERSION = '0.28';
+$IO::Socket::Timeout::Role::PerlIO::VERSION = '0.29';
use PerlIO::via::Timeout;
sub read_timeout { goto &PerlIO::via::Timeout::read_timeout }
@@ -195,7 +197,7 @@
=head1 VERSION
-version 0.28
+version 0.29
=head1 SYNOPSIS
@@ -324,9 +326,10 @@
=head2 PERL_IO_SOCKET_TIMEOUT_FORCE_SELECT
-This module implements timeouts using one of two strategy. If possible (if the
-operating system is linux or mac), it uses C<setsockopt()> to set read / write
-timeouts. Otherwise it uses C<select()> before performing socket operations.
+This module implements timeouts using one of two strategies. If possible (if
+the operating system is linux, freebsd or mac), it uses C<setsockopt()> to set
+read / write timeouts. Otherwise it uses C<select()> before performing socket
+operations.
To force the use of C<select()>, you can set
PERL_IO_SOCKET_TIMEOUT_FORCE_SELECT to a true value at compile time (typically
