--- loncom/LondConnection.pm	2004/03/02 14:57:40	1.28
+++ loncom/LondConnection.pm	2004/03/02 22:38:07	1.29
@@ -1,7 +1,7 @@
 #   This module defines and implements a class that represents
 #   a connection to a lond daemon.
 #
-# $Id: LondConnection.pm,v 1.28 2004/03/02 14:57:40 albertel Exp $
+# $Id: LondConnection.pm,v 1.29 2004/03/02 22:38:07 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -308,7 +308,7 @@ sub Readable {
 
     &Debug(9,"Received from host: ".$data);
     $self->{TransactionReply} .= $data;
-    if($self->{TransactionReply} =~ /(.*\n)/) {
+    if($self->{TransactionReply} =~ m/\n$/) {
 	&Debug(8,"Readable End of line detected");
 	if ($self->{State}  eq "Initialized") { # We received the challenge:
 	    if($self->{TransactionReply} eq "refused\n") {	# Remote doesn't have