Skip Menu |
 

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

Report information
The Basics
Id: 67980
Status: rejected
Priority: 0/
Queue: Net-Stomp

People
Owner: Nobody in particular
Requestors: EGGA [...] cpan.org
Cc:
AdminCc:

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



Subject: send persistent messages
Download (untitled) / with headers
text/plain 589b
Hi! I really like that Net::Stomp thingy. Pretty neat to talk to our activeMQ-Server. One feature, I'd love to be added: sending persistent messages. Not a big thing to do, but it took me some time to figure out, what key/value pair is needed. I patched our Net::Stomp locally with the following code. sub Net::Stomp::send_persistent { my ($self, $conf) = @_; # 1 = non-persistent, 2 = persistent # see http://www.docjar.org/html/api/javax/jms/DeliveryMode.java.html $conf->{JMSDeliveryMode} = 2; $self->send($conf); } Best Regards Jan "Egga" Hartung
Download (untitled) / with headers
text/plain 421b
ARGH! Immediately after creating a "bug,2 i noticed dwilsons annotation. That's readable enough to forget about my "patch", but of course it would be nice to add that to your documentation. Show quoted text
> dwilson (2007-12-19 18:03:00) [edit] [move] > > To make Stomp messages persistent you need to add a persistent =>
'true' to the send - Show quoted text
> > $stomp->send( { destination => '/queue/foo', persistent => 'true',
body => $body } );
not really a protocol feature, just set the 'persistent' header.


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

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.