From: minima <minima>
Date: Fri, 1 Sep 2000 22:17:48 +0000 (+0000)
Subject: allow blank in field 4 of PC10
X-Git-Tag: R_1_44~4
X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=commitdiff_plain;ds=inline;h=eef5d189206ebcfaf8e83675803829c72671a320;p=spider.git

allow blank in field 4 of PC10
---

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index f75d55c2..e2c1dae4 100644
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -51,7 +51,7 @@ $baddxfn = "$main::data/baddx.pl";
 
 @checklist = 
 (
- [ qw(c c m p bc c) ],			# pc10
+ [ qw(c c m bp bc c) ],			# pc10
  [ qw(f m d t m c c h) ],		# pc11
  [ qw(c bc m bp bm p h) ],		# pc12
  [ qw(c h) ],					#