--- loncom/LondTransaction.pm 2003/05/15 02:21:45 1.4 +++ loncom/LondTransaction.pm 2003/06/11 02:04:35 1.5 @@ -1,7 +1,7 @@ # This module defines and implements a class that represents # a connection to a lond daemon. # -# $Id: LondTransaction.pm,v 1.4 2003/05/15 02:21:45 foxr Exp $ +# $Id: LondTransaction.pm,v 1.5 2003/06/11 02:04:35 foxr Exp $ # # Copyright Michigan State University Board of Trustees # @@ -100,6 +100,7 @@ sub new { active => 0, deferred => 0}; bless($self, $class); + return $self; } =pod @@ -177,7 +178,7 @@ sub SetDeferred { my $File = shift; $self->{deferred} = 1; - $self->{DeferrredFile} = $File; + $self->{DeferredFile} = $File; } =pod @@ -298,3 +299,4 @@ sub getRequest { } +1;