Author: mcpierce
Date: Tue May 14 21:26:37 2013
New Revision: 1482598

URL: http://svn.apache.org/r1482598
Log:
QPID-4843: Fixed the Perl spout.pl example.

It still called the old setProperty method on Message rather than
set_property.

Modified:
    qpid/trunk/qpid/cpp/bindings/qpid/examples/perl/spout.pl

Modified: qpid/trunk/qpid/cpp/bindings/qpid/examples/perl/spout.pl
URL: 
http://svn.apache.org/viewvc/qpid/trunk/qpid/cpp/bindings/qpid/examples/perl/spout.pl?rev=1482598&r1=1482597&r2=1482598&view=diff
==============================================================================
--- qpid/trunk/qpid/cpp/bindings/qpid/examples/perl/spout.pl (original)
+++ qpid/trunk/qpid/cpp/bindings/qpid/examples/perl/spout.pl Tue May 14 
21:26:37 2013
@@ -70,7 +70,7 @@ sub setProperties {
 
     foreach (@properties) {
         my ( $name, $value ) = split( "=", $_ );
-        $message->setProperty( $name, $value );
+        $message->set_property( $name, $value );
     }
 }
 



---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]

Reply via email to