--- loncom/loncnew	2003/11/25 10:14:40	1.33
+++ loncom/loncnew	2003/12/11 23:18:37	1.34
@@ -2,7 +2,7 @@
 # The LearningOnline Network with CAPA
 # lonc maintains the connections to remote computers
 #
-# $Id: loncnew,v 1.33 2003/11/25 10:14:40 foxr Exp $
+# $Id: loncnew,v 1.34 2003/12/11 23:18:37 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -305,6 +305,14 @@ sub Tick {
 	my $Socket = $ActiveTransactions{$item}->getServer();
 	$Socket->Tick();
     }
+    foreach my $item (keys %ActiveConnections) {
+	my $State = $ActiveConnections{$item}->data->GetState();
+	if ($State ne 'Idle' && $State ne 'SendingRequest' &&
+	    $State ne 'ReceivingReply') {
+	    Debug(5,"Ticking Socket $State $item");
+	    $ActiveConnections{$item}->data->Tick();
+	}
+    }
     # Do we have work in the queue, but no connections to service them?
     # If so, try to make some new connections to get things going again.
     #