]> scm.dxcluster.org Git - spider.git/commitdiff
added a $ref->{lastt} for PC40
authordjk <djk>
Sat, 10 Jul 1999 13:38:33 +0000 (13:38 +0000)
committerdjk <djk>
Sat, 10 Jul 1999 13:38:33 +0000 (13:38 +0000)
perl/DXMsg.pm

index 2abcb55f95b2967bf21f4d26d241c7f3c5530992..94ee829850aec16bf1665fa34bbbff667bb6a0d2 100644 (file)
@@ -346,6 +346,7 @@ sub process
                        $ref->{stream} = $stream;
                        $ref->{count} = 0;      # no of lines between PC31s
                        $ref->{file} = 1;
                        $ref->{stream} = $stream;
                        $ref->{count} = 0;      # no of lines between PC31s
                        $ref->{file} = 1;
+                       $ref->{lastt} = $main::systime;
                        $work{"$f[2]$stream"} = $ref; # store in work
                        $self->send(DXProt::pc30($f[2], $f[1], $stream)); # send ack 
                        
                        $work{"$f[2]$stream"} = $ref; # store in work
                        $self->send(DXProt::pc30($f[2], $f[1], $stream)); # send ack