testing multi-message fix in parser

git-svn-id: svn://svn.open-ils.org/ILS/trunk@5385 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/OpenSRF/src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm b/OpenSRF/src/perlmods/OpenSRF/Transport/SlimJabber/Client.pm
index e646fc1..b90e172 100644 (file)
--- 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++;