From b1a1e93daee349cc9a1efdc73dd2e3147a7ca767 Mon Sep 17 00:00:00 2001
From: Dirk Koopman <djk@tobit.co.uk>
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.34.1