Skip Menu |

This queue is for tickets about the Net-Stomp CPAN distribution.

Report information
The Basics
Id: 80079
Status: resolved
Priority: 0/
Queue: Net-Stomp

Owner: DAKKAR [...]
Requestors: myquartz [...]

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)

Subject: Headers parsing with Stomp 1.1
Date: Wed, 10 Oct 2012 01:15:40 +0700
To: bug-Net-Stomp [...]
From: Tran Thach Anh <myquartz [...]>
Download (untitled) / with headers
text/plain 827b
Hi author! As version 0.45, there is a bug of repeating header at sub sub _read_headers { my ($self) = @_; if ($self->{_framebuf} =~ s/^\n*([^\n].*?)\n\n//s) { $self->{_framebuf_changed} = 1; my $raw_headers = $1; if ($raw_headers =~ s/^(.+)\n//) { $self->{_command} = $1; } foreach my $line (split(/\n/, $raw_headers)) { my ($key, $value) = split(/\s*:\s*/, $line, 2); BUG ==> $self->{_headers}->{$key} = $value; } return 1; } return 0; } As definition of protocol: Repeated header should be read/parse the first occurrence key. the BUG line should be fixed as: $self->{_headers}->{$key} = $value unless(defined($self->{_headers}->{$key}));
This will be fixed in the next release. Thank you for your submission.
fixed in 0.47

This service is sponsored and maintained by Best Practical Solutions and runs on infrastructure.

Please report any issues with to