slight change to the checking for announces

[spider.git] / perl / DXProt.pm

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