Changeset 2cca044 for perl/modules

Timestamp:

Dec 22, 2009, 6:37:48 PM (15 years ago)

Author:

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

Branches:

master, release-1.10, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9

Children:

0cfa6ee

Parents:

a2a5236

git-author:

Alejandro R. Sedeño <asedeno@mit.edu> (12/22/09 01:16:50)

git-committer:

Alejandro R. Sedeño <asedeno@mit.edu> (12/22/09 18:37:48)

Message:

Replace the jabber roster on reconnect

File:

• perl/modules/Jabber/lib/BarnOwl/Module/Jabber/ConnectionManager.pm (modified) (1 diff)

perl/modules/Jabber/lib/BarnOwl/Module/Jabber/ConnectionManager.pm

@@ -95 +95 @@
         return 0;
     }
+    $self->{$jidStr}->{Roster} = $client->Roster();
     $self->{$jidStr}->{Status} = "available";
     $client->onConnect($self, $jidStr);