diff options
| author | Darryl L. Pierce <mcpierce@apache.org> | 2013-05-17 12:36:10 +0000 |
|---|---|---|
| committer | Darryl L. Pierce <mcpierce@apache.org> | 2013-05-17 12:36:10 +0000 |
| commit | 47db83c40fd9730f050a78aa9bf904ba88b83c09 (patch) | |
| tree | 69397784d51069fb16c66b05688f69a557ede773 /qpid/cpp/bindings | |
| parent | 86782addc855c756b5f284849d62760de6140b52 (diff) | |
| download | qpid-python-47db83c40fd9730f050a78aa9bf904ba88b83c09.tar.gz | |
QPID-4857: Fixed passing Perl Message to C++ code
The Perl code mistakenly passed the Perl Message object, rather than the
wrapped C+ Message object, to the release and reject methods.
git-svn-id: https://svn.apache.org/repos/asf/qpid/trunk@1483771 13f79535-47bb-0310-9956-ffa450edef68
Diffstat (limited to 'qpid/cpp/bindings')
| -rw-r--r-- | qpid/cpp/bindings/qpid/perl/lib/qpid/messaging/Session.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/qpid/cpp/bindings/qpid/perl/lib/qpid/messaging/Session.pm b/qpid/cpp/bindings/qpid/perl/lib/qpid/messaging/Session.pm index af85731685..316f1fa817 100644 --- a/qpid/cpp/bindings/qpid/perl/lib/qpid/messaging/Session.pm +++ b/qpid/cpp/bindings/qpid/perl/lib/qpid/messaging/Session.pm @@ -112,7 +112,7 @@ sub rollback { =over -=item $session->acknowledge( msg ) +=item $session->acknowledge Acknowledges that a specific message that has been received. @@ -149,7 +149,7 @@ sub reject { my ($self) = @_; my $impl = $self->{_impl}; - $impl->reject($_[1]); + $impl->reject($_[1]->get_implementation); } =pod @@ -168,7 +168,7 @@ sub release { my ($self) = @_; my $impl = $self->{_impl}; - $impl->release($_[1]); + $impl->release($_[1]->get_implementation); } =pod |