Changeset 6b580b0 for perl/modules/Jabber/lib/BarnOwl/Module/Jabber
- Timestamp:
- Feb 18, 2008, 5:38:32 PM (16 years ago)
- 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:
- 61abb18
- Parents:
- 18a54ee
- Location:
- perl/modules/Jabber/lib/BarnOwl/Module/Jabber
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
perl/modules/Jabber/lib/BarnOwl/Module/Jabber/Connection.pm
r9c7a701 r6b580b0 130 130 my $self = shift; 131 131 my $sid = getStreamID($self); 132 return $self->{STREAM}-> {SIDS}->{$sid}->{sock}|| -1;132 return $self->{STREAM}->GetSock($sid) || -1; 133 133 } 134 134 … … 145 145 my $jid = $self->{SESSION}->{FULLJID}; 146 146 BarnOwl::error("Jabber account $jid disconnected!"); 147 do_logout($jid);147 BarnOwl::Module::Jabber::do_logout($jid); 148 148 } 149 149 } -
perl/modules/Jabber/lib/BarnOwl/Module/Jabber/ConnectionManager.pm
r9c7a701 r6b580b0 37 37 return 0 unless exists $self->{$jidStr}; 38 38 39 BarnOwl::remove_dispatch($self->{$jidStr}->{Client}-> getSocket()->fileno());39 BarnOwl::remove_dispatch($self->{$jidStr}->{Client}->{fileno}) if $self->{$jidStr}->{Client}->{fileno}; 40 40 $self->{$jidStr}->{Client}->Disconnect() 41 41 if $self->{$jidStr}->{Client};
Note: See TracChangeset
for help on using the changeset viewer.