From ab9637bce19343bdb0b3625226419de2e3915674 Mon Sep 17 00:00:00 2001 From: "Darryl L. Pierce" Date: Fri, 7 Dec 2012 15:09:21 +0000 Subject: NO-JIRA: Small typo fix in the drain..pl example. git-svn-id: https://svn.apache.org/repos/asf/qpid/trunk/qpid@1418350 13f79535-47bb-0310-9956-ffa450edef68 --- cpp/bindings/qpid/examples/perl/drain.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'cpp') diff --git a/cpp/bindings/qpid/examples/perl/drain.pl b/cpp/bindings/qpid/examples/perl/drain.pl index 2da28f2867..e66184a160 100755 --- a/cpp/bindings/qpid/examples/perl/drain.pl +++ b/cpp/bindings/qpid/examples/perl/drain.pl @@ -78,7 +78,7 @@ eval { my $redelivered = ($message->get_redelivered) ? "redelivered=True, " : ""; print "Message(" . $redelivered . "properties=" . printProperties($message->get_properties()) . ", content='"; if ($message->get_content_type() eq "amqp/map") { - my $content = qpid::messasging::decode_map($message); + my $content = qpid::messaging::decode_map($message); map{ print "\n$_ => $content->{$_}"; } keys %{$content}; } else { -- cgit v1.2.1