r45067 - in /branches/upstream/libanyevent-perl/current: Changes MANIFEST META.json META.yml lib/AnyEvent.pm lib/AnyEvent/Handle.pm lib/AnyEvent/Impl/IOAsync.pm lib/AnyEvent/Socket.pm

jawnsy-guest at users.alioth.debian.org jawnsy-guest at users.alioth.debian.org
Wed Sep 30 03:18:16 UTC 2009 

Author: jawnsy-guest
Date: Wed Sep 30 03:18:11 2009
New Revision: 45067

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=45067
Log:
[svn-upgrade] Integrating new upstream version, libanyevent-perl (5.201)

Added:
    branches/upstream/libanyevent-perl/current/META.json
Modified:
    branches/upstream/libanyevent-perl/current/Changes
    branches/upstream/libanyevent-perl/current/MANIFEST
    branches/upstream/libanyevent-perl/current/META.yml
    branches/upstream/libanyevent-perl/current/lib/AnyEvent.pm
    branches/upstream/libanyevent-perl/current/lib/AnyEvent/Handle.pm
    branches/upstream/libanyevent-perl/current/lib/AnyEvent/Impl/IOAsync.pm
    branches/upstream/libanyevent-perl/current/lib/AnyEvent/Socket.pm

Modified: branches/upstream/libanyevent-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libanyevent-perl/current/Changes?rev=45067&op=diff
==============================================================================
--- branches/upstream/libanyevent-perl/current/Changes (original)
+++ branches/upstream/libanyevent-perl/current/Changes Wed Sep 30 03:18:11 2009
@@ -1,4 +1,10 @@
 Revision history for Perl extension AnyEvent.
+
+5.201 Tue Sep 29 12:09:25 CEST 2009
+	- AnyEvent:Handle::on_starttls/on_stoptls methods were broken
+          (reported by Torsten Foertsch).
+        - common::sense 2.0 could cause tcp_server to throw an exception
+          (analysed by elmex).
 
 5.2  Mon Sep 14 07:04:49 CEST 2009
 	- INCOMPATIBLE CHANGE: do no longer support register_read_type
@@ -103,7 +109,7 @@
 4.881 Tue Jul 28 12:51:53 CEST 2009
 	- work around a bug in local in pre-5.10 perls, causing
           AnyEvent::Handle to recurse when it should not
-          (analyzed by elmex).
+          (analysed by elmex).
 
 4.88 Tue Jul 28 04:04:37 CEST 2009
 	- re-bless the handle into a dummy package after calling
@@ -338,11 +344,11 @@
 	- fixed a great number of bugs and corner cases in AnyEvent::Handle:
         - fix a bug in where in SSL connect mode, the
           client would first wait for some data by the server and
-          otherwise hang. (reported and analyzed in an absolutely
+          otherwise hang. (reported and analysed in an absolutely
           exemplary manner by Adam Rosenstein).
         - fix a bug in where SSL EOF would not be treated
           as stream EOF, putting the connection into a hung state.
-          (reported and analyzed in an absolutely exemplary manner by Adam
+          (reported and analysed in an absolutely exemplary manner by Adam
           Rosenstein).
         - fix a potential segfault when the TLS context
           would go missing in a read callback (e.g. due to stoptls) -

Modified: branches/upstream/libanyevent-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libanyevent-perl/current/MANIFEST?rev=45067&op=diff
==============================================================================
--- branches/upstream/libanyevent-perl/current/MANIFEST (original)
+++ branches/upstream/libanyevent-perl/current/MANIFEST Wed Sep 30 03:18:11 2009
@@ -48,3 +48,4 @@
 eg/ae0.pl
 eg/ae2.pl
 META.yml                                 Module meta-data (added by MakeMaker)
+META.json                                Module meta-data (added by MakeMaker)

Added: branches/upstream/libanyevent-perl/current/META.json
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libanyevent-perl/current/META.json?rev=45067&op=file
==============================================================================
--- branches/upstream/libanyevent-perl/current/META.json (added)
+++ branches/upstream/libanyevent-perl/current/META.json Wed Sep 30 03:18:11 2009
@@ -1,0 +1,1 @@
+{"no_index":{"directory":["t","inc"]},"meta-spec":{"version":1.4,"url":"http://module-build.sourceforge.net/META-spec-v1.4.html"},"generated_by":"ExtUtils::MakeMaker version 6.54","distribution_type":"module","version":"5.201","name":"AnyEvent","author":[],"license":"unknown","build_requires":{"ExtUtils::MakeMaker":0},"requires":{},"recommends":{"Net::SSLeay":1.33,"Guard":1.02,"EV":3.05,"Async::Interrupt":1,"JSON::XS":2.2,"JSON":2.09},"abstract":null,"configure_requires":{"ExtUtils::MakeMaker":0}}

Modified: branches/upstream/libanyevent-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libanyevent-perl/current/META.yml?rev=45067&op=diff
==============================================================================
--- branches/upstream/libanyevent-perl/current/META.yml (original)
+++ branches/upstream/libanyevent-perl/current/META.yml Wed Sep 30 03:18:11 2009
@@ -9,9 +9,9 @@
       "version" : 1.4,
       "url" : "http://module-build.sourceforge.net/META-spec-v1.4.html"
    },
-   "generated_by" : "ExtUtils::MakeMaker version 6.50",
+   "generated_by" : "ExtUtils::MakeMaker version 6.54",
    "distribution_type" : "module",
-   "version" : "5.2",
+   "version" : "5.201",
    "name" : "AnyEvent",
    "author" : [],
    "license" : "unknown",

Modified: branches/upstream/libanyevent-perl/current/lib/AnyEvent.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libanyevent-perl/current/lib/AnyEvent.pm?rev=45067&op=diff
==============================================================================
--- branches/upstream/libanyevent-perl/current/lib/AnyEvent.pm (original)
+++ branches/upstream/libanyevent-perl/current/lib/AnyEvent.pm Wed Sep 30 03:18:11 2009
@@ -1118,7 +1118,7 @@
 
 use Carp ();
 
-our $VERSION = '5.2';
+our $VERSION = '5.201';
 our $MODEL;
 
 our $AUTOLOAD;

Modified: branches/upstream/libanyevent-perl/current/lib/AnyEvent/Handle.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libanyevent-perl/current/lib/AnyEvent/Handle.pm?rev=45067&op=diff
==============================================================================
--- branches/upstream/libanyevent-perl/current/lib/AnyEvent/Handle.pm (original)
+++ branches/upstream/libanyevent-perl/current/lib/AnyEvent/Handle.pm Wed Sep 30 03:18:11 2009
@@ -16,7 +16,7 @@
          warn "got error $msg\n";
          $hdl->destroy;
          $cv->send;
-      );
+      };
 
    # send some request line
    $hdl->push_write ("getinfo\015\012");
@@ -712,7 +712,7 @@
 
 =cut
 
-sub on_starttls {
+sub on_stoptls {
    $_[0]{on_stoptls} = $_[1];
 }
 

Modified: branches/upstream/libanyevent-perl/current/lib/AnyEvent/Impl/IOAsync.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libanyevent-perl/current/lib/AnyEvent/Impl/IOAsync.pm?rev=45067&op=diff
==============================================================================
--- branches/upstream/libanyevent-perl/current/lib/AnyEvent/Impl/IOAsync.pm (original)
+++ branches/upstream/libanyevent-perl/current/lib/AnyEvent/Impl/IOAsync.pm Wed Sep 30 03:18:11 2009
@@ -106,7 +106,7 @@
 
 How to actually get I/O events in L<IO::Async::Handle> is undocumented:
 read events are apparently automatic, for write events, you have to
-explicitly request C<want_writable>, and specifying C<want_readable> is
+explicitly request C<want_writeready>, and specifying C<want_readready> is
 apparently a usage bug (it doesn't exist). All this must be deduced from
 reading the sources.
 

Modified: branches/upstream/libanyevent-perl/current/lib/AnyEvent/Socket.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libanyevent-perl/current/lib/AnyEvent/Socket.pm?rev=45067&op=diff
==============================================================================
--- branches/upstream/libanyevent-perl/current/lib/AnyEvent/Socket.pm (original)
+++ branches/upstream/libanyevent-perl/current/lib/AnyEvent/Socket.pm Wed Sep 30 03:18:11 2009
@@ -1018,7 +1018,7 @@
 
    $state{aw} = AE::io $state{fh}, 0, sub {
       # this closure keeps $state alive
-      while (my $peer = accept my $fh, $state{fh}) {
+      while ($state{fh} && (my $peer = accept my $fh, $state{fh})) {
          fh_nonblocking $fh, 1; # POSIX requires inheritance, the outside world does not
 
          my ($service, $host) = unpack_sockaddr $peer;

More information about the Pkg-perl-cvs-commits mailing list