Changeset 859077469433dd85e1c9ebff365cb2cc6d237c6a
- Timestamp:
- 10/24/09 12:12:15 (4 weeks ago)
- Author:
- Alejandro R. Sedeño <asedeno@mit.edu>
- git-author:
- Alejandro R. Sedeño <asedeno@mit.edu> / 2009-10-18T17:11:55Z-0400
- Parents:
- 23fddadbb7a375688e9be9627f1f5ca39aaa54d0
- Children:
- 6211c76aaa89daad04de5054a29f0cca46630638
- git-committer:
- Alejandro R. Sedeño <asedeno@mit.edu> / 2009-10-24T12:12:15Z-0400
- Message:
-
Reconnect to MUCs when reconnecting to Jabber.
Signed-off-by: Alejandro R. Sedeño <asedeno@mit.edu>
Signed-off-by: Nelson Elhage <nelhage@mit.edu>
- Location:
- perl/modules/Jabber/lib/BarnOwl/Module/Jabber
- Files:
-
Legend:
- Unmodified
- Added
- Removed
-
|
ra957e92
|
r8590774
|
|
| 43 | 43 | my $self = shift; |
| 44 | 44 | my $muc = Net::Jabber::MUC->new(connection => $self, @_); |
| | 45 | $muc->{ARGS} = @_; # Save these for later |
| 45 | 46 | $muc->Join(@_); |
| 46 | 47 | |
-
|
rf3678c3
|
r8590774
|
|
| 98 | 98 | $self->{$jidStr}{Status} = "available"; |
| 99 | 99 | |
| | 100 | foreach my $muc ($self->{$jidStr}->{Client}->MUCs()) { |
| | 101 | $muc->Join($muc->{ARGS}); |
| | 102 | } |
| | 103 | |
| 100 | 104 | return 1; |
| 101 | 105 | } |
