From 802d60edf7a7256f813b87d6651b0999514c78a5 Mon Sep 17 00:00:00 2001 From: erickson Date: Tue, 8 Aug 2006 21:32:53 +0000 Subject: [PATCH] testing multi-message fix in parser git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@755 9efc2488-bf62-4759-914b-345cdb29e865 --- src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm b/src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm index e646fc1..b90e172 100644 --- a/src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm +++ b/src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm @@ -194,7 +194,7 @@ sub timed_read { my ($tag) = ($buffer =~ /<([^\s\?\>]+)/o); $logger->transport("Using tag: $tag ", INTERNAL); - if ( $buffer =~ /^(.*?<\/$tag>)(.*)/s) { + if ( $buffer =~ /^(.*?<\/$tag>){1}(.*)/s) { $buffer = $1; $self->{temp_buffer} = $2; $complete++; -- 2.11.0