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 | 45684377c17bb7bbd155aabbf8493cbd9c5b6ae1 (patch) | |
| tree | 0792d843accc29ccd9da1d370804c855818b1752 | |
| parent | 0a0c87a6ae30afa26f68b02b3ac5a42395867fba (diff) | |
| download | qpid-python-45684377c17bb7bbd155aabbf8493cbd9c5b6ae1.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/qpid@1483771 13f79535-47bb-0310-9956-ffa450edef68
| -rw-r--r-- | cpp/bindings/qpid/perl/lib/qpid/messaging/Session.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/cpp/bindings/qpid/perl/lib/qpid/messaging/Session.pm b/cpp/bindings/qpid/perl/lib/qpid/messaging/Session.pm index af85731685..316f1fa817 100644 --- a/cpp/bindings/qpid/perl/lib/qpid/messaging/Session.pm +++ b/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 |