From: Dirk Koopman <djk@tobit.co.uk>
Date: Fri, 16 Nov 2007 18:04:16 +0000 (+0000)
Subject: add a bit of extra pc92 check debugging
X-Git-Tag: 1.55~37
X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=bf54094816fc2169e93adbddcba219e241de4e7f;p=spider.git

add a bit of extra pc92 check debugging
---

diff --git a/perl/DXProtHandle.pm b/perl/DXProtHandle.pm
index b6f4473d..0d046f50 100644
--- a/perl/DXProtHandle.pm
+++ b/perl/DXProtHandle.pm
@@ -1530,6 +1530,7 @@ sub check_pc9x_t
 	} elsif ($create) {
 		$parent = Route::Node->new($call);
 	} else {
+		dbg("PCPROT: $call does not exist, ignored") if isdbg('pc92dedupe');
 		return undef;
 	}
 	if (isdbg('pc92dedupe')) {
diff --git a/perl/Version.pm b/perl/Version.pm
index 3e165a52..2dcc345c 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 = '182';
+$build = '183';
 
 1;