--- loncom/LondConnection.pm 2005/05/27 21:49:18 1.37 +++ loncom/LondConnection.pm 2006/01/26 21:34:25 1.38 @@ -1,7 +1,7 @@ # This module defines and implements a class that represents # a connection to a lond daemon. # -# $Id: LondConnection.pm,v 1.37 2005/05/27 21:49:18 albertel Exp $ +# $Id: LondConnection.pm,v 1.38 2006/01/26 21:34:25 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -508,7 +508,8 @@ sub Readable { return 0; } elsif ($self->{State} eq "ReadingVersionString") { - $self->{LondVersion} = chomp($self->{TransactionReply}); + chomp($self->{TransactionReply}); + $self->{LondVersion} = $self->{TransactionReply}; $self->Transition("SetHost"); $self->{InformReadable} = 0; $self->{InformWritable} = 1;