[307] in BarnOwl Developers

home help back first fref pref prev next nref lref last post

[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);


home help back first fref pref prev next nref lref last post