r39241 - in /trunk/libanyevent-perl: Changes META.yml debian/changelog lib/AnyEvent.pm lib/AnyEvent/DNS.pm lib/AnyEvent/Handle.pm lib/AnyEvent/Impl/Perl.pm lib/AnyEvent/Socket.pm lib/AnyEvent/Util.pm

jawnsy-guest at users.alioth.debian.org jawnsy-guest at users.alioth.debian.org
Fri Jul 3 14:28:05 UTC 2009


Author: jawnsy-guest
Date: Fri Jul  3 14:27:59 2009
New Revision: 39241

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=39241
Log:
* New upstream release
  + Small bug fix (fixes breakage of AnyEvent::HTTP when shutting down
    an AnyEvent::Handle)

Modified:
    trunk/libanyevent-perl/Changes
    trunk/libanyevent-perl/META.yml
    trunk/libanyevent-perl/debian/changelog
    trunk/libanyevent-perl/lib/AnyEvent.pm
    trunk/libanyevent-perl/lib/AnyEvent/DNS.pm
    trunk/libanyevent-perl/lib/AnyEvent/Handle.pm
    trunk/libanyevent-perl/lib/AnyEvent/Impl/Perl.pm
    trunk/libanyevent-perl/lib/AnyEvent/Socket.pm
    trunk/libanyevent-perl/lib/AnyEvent/Util.pm

Modified: trunk/libanyevent-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libanyevent-perl/Changes?rev=39241&op=diff
==============================================================================
--- trunk/libanyevent-perl/Changes (original)
+++ trunk/libanyevent-perl/Changes Fri Jul  3 14:27:59 2009
@@ -1,4 +1,8 @@
 Revision history for Perl extension AnyEvent.
+
+4.451 Fri Jul  3 00:28:58 CEST 2009
+	- do not clear rbuf when shutting down an AnyEvent::Handle
+          object - doing so breaks AnyEvent::HTTP.
 
 4.45  Mon Jun 29 22:59:26 CEST 2009
         - a write error could cause AnyEvent::Handle to create

Modified: trunk/libanyevent-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libanyevent-perl/META.yml?rev=39241&op=diff
==============================================================================
--- trunk/libanyevent-perl/META.yml (original)
+++ trunk/libanyevent-perl/META.yml Fri Jul  3 14:27:59 2009
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:               AnyEvent
-version:            4.45
+version:            4.451
 abstract:           ~
 author:  []
 license:            unknown

Modified: trunk/libanyevent-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libanyevent-perl/debian/changelog?rev=39241&op=diff
==============================================================================
--- trunk/libanyevent-perl/debian/changelog (original)
+++ trunk/libanyevent-perl/debian/changelog Fri Jul  3 14:27:59 2009
@@ -1,3 +1,11 @@
+libanyevent-perl (4.451-1) UNRELEASED; urgency=low
+
+  * New upstream release
+    + Small bug fix (fixes breakage of AnyEvent::HTTP when shutting down
+      an AnyEvent::Handle)
+
+ -- Jonathan Yu <frequency at cpan.org>  Fri, 03 Jul 2009 06:26:50 -0400
+
 libanyevent-perl (4.450-1) unstable; urgency=low
 
   * New upstream release

Modified: trunk/libanyevent-perl/lib/AnyEvent.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libanyevent-perl/lib/AnyEvent.pm?rev=39241&op=diff
==============================================================================
--- trunk/libanyevent-perl/lib/AnyEvent.pm (original)
+++ trunk/libanyevent-perl/lib/AnyEvent.pm Fri Jul  3 14:27:59 2009
@@ -970,7 +970,7 @@
 
 use Carp;
 
-our $VERSION = 4.45;
+our $VERSION = 4.451;
 our $MODEL;
 
 our $AUTOLOAD;

Modified: trunk/libanyevent-perl/lib/AnyEvent/DNS.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libanyevent-perl/lib/AnyEvent/DNS.pm?rev=39241&op=diff
==============================================================================
--- trunk/libanyevent-perl/lib/AnyEvent/DNS.pm (original)
+++ trunk/libanyevent-perl/lib/AnyEvent/DNS.pm Fri Jul  3 14:27:59 2009
@@ -37,7 +37,7 @@
 use AnyEvent::Handle ();
 use AnyEvent::Util qw(AF_INET6);
 
-our $VERSION = 4.45;
+our $VERSION = 4.451;
 
 our @DNS_FALLBACK = (v208.67.220.220, v208.67.222.222);
 

Modified: trunk/libanyevent-perl/lib/AnyEvent/Handle.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libanyevent-perl/lib/AnyEvent/Handle.pm?rev=39241&op=diff
==============================================================================
--- trunk/libanyevent-perl/lib/AnyEvent/Handle.pm (original)
+++ trunk/libanyevent-perl/lib/AnyEvent/Handle.pm Fri Jul  3 14:27:59 2009
@@ -16,7 +16,7 @@
 
 =cut
 
-our $VERSION = 4.45;
+our $VERSION = 4.451;
 
 =head1 SYNOPSIS
 
@@ -314,7 +314,7 @@
 sub _shutdown {
    my ($self) = @_;
 
-   delete @$self{qw(_tw _rw _ww fh rbuf wbuf on_read _queue)};
+   delete @$self{qw(_tw _rw _ww fh wbuf on_read _queue)};
 
    &_freetls;
 }

Modified: trunk/libanyevent-perl/lib/AnyEvent/Impl/Perl.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libanyevent-perl/lib/AnyEvent/Impl/Perl.pm?rev=39241&op=diff
==============================================================================
--- trunk/libanyevent-perl/lib/AnyEvent/Impl/Perl.pm (original)
+++ trunk/libanyevent-perl/lib/AnyEvent/Impl/Perl.pm Fri Jul  3 14:27:59 2009
@@ -113,7 +113,7 @@
 use AnyEvent ();
 use AnyEvent::Util ();
 
-our $VERSION = 4.45;
+our $VERSION = 4.451;
 
 our ($NOW, $MNOW);
 

Modified: trunk/libanyevent-perl/lib/AnyEvent/Socket.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libanyevent-perl/lib/AnyEvent/Socket.pm?rev=39241&op=diff
==============================================================================
--- trunk/libanyevent-perl/lib/AnyEvent/Socket.pm (original)
+++ trunk/libanyevent-perl/lib/AnyEvent/Socket.pm Fri Jul  3 14:27:59 2009
@@ -59,7 +59,7 @@
    tcp_connect
 );
 
-our $VERSION = 4.45;
+our $VERSION = 4.451;
 
 =item $ipn = parse_ipv4 $dotted_quad
 

Modified: trunk/libanyevent-perl/lib/AnyEvent/Util.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libanyevent-perl/lib/AnyEvent/Util.pm?rev=39241&op=diff
==============================================================================
--- trunk/libanyevent-perl/lib/AnyEvent/Util.pm (original)
+++ trunk/libanyevent-perl/lib/AnyEvent/Util.pm Fri Jul  3 14:27:59 2009
@@ -34,7 +34,7 @@
 our @EXPORT = qw(fh_nonblocking guard fork_call portable_pipe portable_socketpair);
 our @EXPORT_OK = qw(AF_INET6 WSAEWOULDBLOCK WSAEINPROGRESS WSAEINVAL WSAWOULDBLOCK);
 
-our $VERSION = 4.45;
+our $VERSION = 4.451;
 
 BEGIN {
    my $posix = 1 * eval { local $SIG{__DIE__}; require POSIX };




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