Changeset 5073972

Timestamp:

Aug 17, 2007, 12:48:37 PM (17 years ago)

Author:

Alejandro R. Sedeño <asedeno@mit.edu>

Branches:

master, barnowl_perlaim, debian, release-1.10, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9

Children:

ef9438a

Parents:

18fb3d4f

Message:

Apply patch from:
http://rt.cpan.org/Public/Bug/Display.html?id=17484

Fixing problems with jabber servers keeping the same stream id when negotiating TLS.

Thanks to ghudson for tracking this down.

File:

• perl/modules/Jabber/lib/XML/Stream.pm (modified) (1 diff)

perl/modules/Jabber/lib/XML/Stream.pm

@@ -1161 +1161 @@
     }
 
-    delete($self->{SIDS}->{$currsid});
+    # 08.04.05(Fri) slipstream@yandex.ru for compapility with ejabberd since it reuses stream id
+    delete($self->{SIDS}->{$currsid}) unless ($currsid eq $sid);
 
     if (exists($self->GetRoot($sid)->{version}) &&