[307] in BarnOwl Developers
[D-O-H] r452 - / trunk/owl/perl/modules
daemon@ATHENA.MIT.EDU (nelhage@MIT.EDU)
Thu Oct 29 18:04:43 2009
Resent-From: nelhage@mit.edu
Resent-To: barnowl-dev-mtg@charon.mit.edu
To: dirty-owl-hackers@mit.edu
From: nelhage@MIT.EDU
Reply-to: dirty-owl-hackers@MIT.EDU
Date: Thu, 9 Nov 2006 19:45:13 -0500 (EST)
Author: nelhage
Date: 2006-11-09 19:45:13 -0500 (Thu, 09 Nov 2006)
New Revision: 452
Modified:
/
trunk/owl/perl/modules/jabber.pl
Log:
r23941@heretique: nelhage | 2006-11-09 19:45:07 -0500
Handling disconnects better
Property changes on:
___________________________________________________________________
Name: svk:merge
- 6aa88b72-b502-0410-8cb4-a5dd0230fb79:/owl-local:1356
+ 6122c8b4-0e12-0410-9533-8bcd7c66c992:/local/dirty-owl-hacks:23941
6aa88b72-b502-0410-8cb4-a5dd0230fb79:/owl-local:1356
Modified: trunk/owl/perl/modules/jabber.pl
===================================================================
--- trunk/owl/perl/modules/jabber.pl 2006-11-06 06:59:10 UTC (rev 451)
+++ trunk/owl/perl/modules/jabber.pl 2006-11-10 00:45:13 UTC (rev 452)
@@ -48,16 +48,10 @@
my $client = \$connections->{$jid}->{client};
my $status = $$client->Process(0);
- if ($status == 0 # No data received
- || $status == 1) # Data received
- {
- }
- else #Error
- {
- do_logout($jid);
- return;
- }
-
+ if(!defined($status)) {
+ owl::error("Jabber account $jid disconnected!");
+ do_logout($jid);
+ }
if ($::shutdown)
{
do_logout($jid);