From 3bbd1bde8c788fcabb2846228332687f27d75911 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/ILS/trunk@5385 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- OpenSRF/src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/OpenSRF/src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm b/OpenSRF/src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm index e646fc12b0..b90e172d71 100644 --- a/OpenSRF/src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm +++ b/OpenSRF/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.43.2