r45070 - in /trunk/libanyevent-perl: Changes MANIFEST META.json META.yml debian/changelog 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:20:19 UTC 2009


Author: jawnsy-guest
Date: Wed Sep 30 03:20:13 2009
New Revision: 45070

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=45070
Log:
* New upstream release
  + Fix regression on AnyEvent::Handle's on_starttls and on_stoptls
  + common::sense 2.0 could cause tcp_server to throw an exception

Added:
    trunk/libanyevent-perl/META.json
      - copied unchanged from r45068, branches/upstream/libanyevent-perl/current/META.json
Modified:
    trunk/libanyevent-perl/Changes
    trunk/libanyevent-perl/MANIFEST
    trunk/libanyevent-perl/META.yml
    trunk/libanyevent-perl/debian/changelog
    trunk/libanyevent-perl/lib/AnyEvent.pm
    trunk/libanyevent-perl/lib/AnyEvent/Handle.pm
    trunk/libanyevent-perl/lib/AnyEvent/Impl/IOAsync.pm
    trunk/libanyevent-perl/lib/AnyEvent/Socket.pm

Modified: trunk/libanyevent-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libanyevent-perl/Changes?rev=45070&op=diff
==============================================================================
--- trunk/libanyevent-perl/Changes (original)
+++ trunk/libanyevent-perl/Changes Wed Sep 30 03:20:13 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: trunk/libanyevent-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libanyevent-perl/MANIFEST?rev=45070&op=diff
==============================================================================
--- trunk/libanyevent-perl/MANIFEST (original)
+++ trunk/libanyevent-perl/MANIFEST Wed Sep 30 03:20:13 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)

Modified: trunk/libanyevent-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libanyevent-perl/META.yml?rev=45070&op=diff
==============================================================================
--- trunk/libanyevent-perl/META.yml (original)
+++ trunk/libanyevent-perl/META.yml Wed Sep 30 03:20:13 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: trunk/libanyevent-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libanyevent-perl/debian/changelog?rev=45070&op=diff
==============================================================================
--- trunk/libanyevent-perl/debian/changelog (original)
+++ trunk/libanyevent-perl/debian/changelog Wed Sep 30 03:20:13 2009
@@ -1,3 +1,11 @@
+libanyevent-perl (5.201-1) UNRELEASED; urgency=low
+
+  * New upstream release
+    + Fix regression on AnyEvent::Handle's on_starttls and on_stoptls
+    + common::sense 2.0 could cause tcp_server to throw an exception
+
+ -- Jonathan Yu <jawnsy at cpan.org>  Tue, 29 Sep 2009 19:30:42 -0400
+
 libanyevent-perl (5.200-1) unstable; urgency=low
 
   [ Jonathan Yu ]

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

Modified: trunk/libanyevent-perl/lib/AnyEvent/Handle.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libanyevent-perl/lib/AnyEvent/Handle.pm?rev=45070&op=diff
==============================================================================
--- trunk/libanyevent-perl/lib/AnyEvent/Handle.pm (original)
+++ trunk/libanyevent-perl/lib/AnyEvent/Handle.pm Wed Sep 30 03:20:13 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: trunk/libanyevent-perl/lib/AnyEvent/Impl/IOAsync.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libanyevent-perl/lib/AnyEvent/Impl/IOAsync.pm?rev=45070&op=diff
==============================================================================
--- trunk/libanyevent-perl/lib/AnyEvent/Impl/IOAsync.pm (original)
+++ trunk/libanyevent-perl/lib/AnyEvent/Impl/IOAsync.pm Wed Sep 30 03:20:13 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: trunk/libanyevent-perl/lib/AnyEvent/Socket.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libanyevent-perl/lib/AnyEvent/Socket.pm?rev=45070&op=diff
==============================================================================
--- trunk/libanyevent-perl/lib/AnyEvent/Socket.pm (original)
+++ trunk/libanyevent-perl/lib/AnyEvent/Socket.pm Wed Sep 30 03:20:13 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