From f531b1f3cc4bb027b20aa17b714634de96f13e07 Mon Sep 17 00:00:00 2001 From: djk Date: Sat, 10 Jul 1999 13:38:33 +0000 Subject: [PATCH] added a $ref->{lastt} for PC40 --- perl/DXMsg.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/perl/DXMsg.pm b/perl/DXMsg.pm index 2abcb55f..94ee8298 100644 --- a/perl/DXMsg.pm +++ b/perl/DXMsg.pm @@ -346,6 +346,7 @@ sub process $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 -- 2.34.1