--- loncom/LondTransaction.pm 2003/05/13 01:01:49 1.3 +++ loncom/LondTransaction.pm 2003/05/15 02:21:45 1.4 @@ -1,7 +1,7 @@ # This module defines and implements a class that represents # a connection to a lond daemon. # -# $Id: LondTransaction.pm,v 1.3 2003/05/13 01:01:49 foxr Exp $ +# $Id: LondTransaction.pm,v 1.4 2003/05/15 02:21:45 foxr Exp $ # # Copyright Michigan State University Board of Trustees # @@ -208,33 +208,6 @@ sub SetClient { =pod -=item WroteSome - - Called to indicate that some bytes were writtne to lond. - The request is trimmed by the number of bytes written. - If no bytes are left, nonzero is returned, else 0. - -Parameters: - -=over 3 - -=item Count - -Number of bytes written - -=back - -=cut -sub WroteSome { - my $self = shift; - my $Count = shift; - - substr($self->{request}, length($self->{request}), $Count); - - return (length($self->{request]) == 0); - -=pod - =head2 Selectors