r70423 - in /branches/upstream/libnet-stomp-perl/current: CHANGES META.yml lib/Net/Stomp.pm
ansgar at users.alioth.debian.org
ansgar at users.alioth.debian.org
Sat Mar 5 13:07:54 UTC 2011
Author: ansgar
Date: Sat Mar 5 13:07:43 2011
New Revision: 70423
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=70423
Log:
[svn-upgrade] new version libnet-stomp-perl (0.40)
Modified:
branches/upstream/libnet-stomp-perl/current/CHANGES
branches/upstream/libnet-stomp-perl/current/META.yml
branches/upstream/libnet-stomp-perl/current/lib/Net/Stomp.pm
Modified: branches/upstream/libnet-stomp-perl/current/CHANGES
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnet-stomp-perl/current/CHANGES?rev=70423&op=diff
==============================================================================
--- branches/upstream/libnet-stomp-perl/current/CHANGES (original)
+++ branches/upstream/libnet-stomp-perl/current/CHANGES Sat Mar 5 13:07:43 2011
@@ -1,7 +1,11 @@
Revision history for Perl module Net::Stomp:
+0.40 Fri Feb 4 09:16:39 GMT 2011
+ - Fix silly bug in _read_body (reported by Zulf Ahmed)
+ - Remove uninitialized value in numeric gt warning (reported by Dave Krieger)
+
0.39 Fri Jan 14 15:59:27 GMT 2011
- - Cope with EOF during receive_frame better
+ - Cope with EOF during receive_frame better
0.38_99 Fri Aug 27 00:11:08 BST 2010
- Reimplemented Net::Stomp::receive_frame() to properly handle STOMP frames
Modified: branches/upstream/libnet-stomp-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnet-stomp-perl/current/META.yml?rev=70423&op=diff
==============================================================================
--- branches/upstream/libnet-stomp-perl/current/META.yml (original)
+++ branches/upstream/libnet-stomp-perl/current/META.yml Sat Mar 5 13:07:43 2011
@@ -13,7 +13,7 @@
provides:
Net::Stomp:
file: lib/Net/Stomp.pm
- version: 0.39
+ version: 0.40
Net::Stomp::Frame:
file: lib/Net/Stomp/Frame.pm
requires:
@@ -22,4 +22,4 @@
IO::Socket::INET: 0
resources:
license: http://dev.perl.org/licenses/
-version: 0.39
+version: 0.40
Modified: branches/upstream/libnet-stomp-perl/current/lib/Net/Stomp.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnet-stomp-perl/current/lib/Net/Stomp.pm?rev=70423&op=diff
==============================================================================
--- branches/upstream/libnet-stomp-perl/current/lib/Net/Stomp.pm (original)
+++ branches/upstream/libnet-stomp-perl/current/lib/Net/Stomp.pm Sat Mar 5 13:07:43 2011
@@ -6,7 +6,7 @@
use Net::Stomp::Frame;
use Carp;
use base 'Class::Accessor::Fast';
-our $VERSION = '0.39';
+our $VERSION = '0.40';
__PACKAGE__->mk_accessors( qw(
_cur_host failover hostname hosts port select serial session_id socket ssl
@@ -260,7 +260,7 @@
$self->bufsize,
length($self->{_framebuf} || ''));
- if ($len > 0) {
+ if ($len && $len > 0) {
$self->{_framebuf_changed} = 1;
}
else {
@@ -298,7 +298,7 @@
if ($h->{'content-length'}) {
if (length($self->{_framebuf}) >= $h->{'content-length'}) {
$self->{_framebuf_changed} = 1;
- my $body = substr($self->{framebuf},
+ my $body = substr($self->{_framebuf},
0,
$h->{'content-length'},
undef );
More information about the Pkg-perl-cvs-commits
mailing list