From b1a1e93daee349cc9a1efdc73dd2e3147a7ca767 Mon Sep 17 00:00:00 2001 From: Dirk Koopman Date: Sat, 23 Jun 2007 08:22:11 +0100 Subject: [PATCH] fix dedupe algorthim --- perl/DXProtHandle.pm | 2 +- perl/Version.pm | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/perl/DXProtHandle.pm b/perl/DXProtHandle.pm index b5d7568a..0010ab45 100644 --- a/perl/DXProtHandle.pm +++ b/perl/DXProtHandle.pm @@ -1467,7 +1467,7 @@ sub check_pc9x_t return; } } - if ($lastid == $t) { + if ($lastid >= $t) { dbg("PCPROT: dup id on $call = $lastid, ignored") if isdbg('chanerr'); return; } diff --git a/perl/Version.pm b/perl/Version.pm index 5e5c54f0..b63bf77f 100644 --- a/perl/Version.pm +++ b/perl/Version.pm @@ -11,6 +11,6 @@ use vars qw($version $subversion $build); $version = '1.54'; $subversion = '0'; -$build = '63'; +$build = '64'; 1; -- 2.43.0