From 4e0bbfaeff358a1cf0afe7b7c4aeaec734607803 Mon Sep 17 00:00:00 2001
From: dustine32 <dustine32@gmail.com>
Date: Tue, 31 Dec 2019 15:52:16 -0800
Subject: [PATCH] Only IBA-to-exp qual exact match equals agreement - issue #39

---
 scripts/createGAF.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/scripts/createGAF.pl b/scripts/createGAF.pl
index 91ec405..46ec17f 100755
--- a/scripts/createGAF.pl
+++ b/scripts/createGAF.pl
@@ -491,7 +491,7 @@
             if (defined $exp_qualifier{$gene} && defined $exp_qualifier{$gene}{$go}){
                 foreach my $ev_id (keys %{$exp_qualifier{$gene}{$go}}){
                     foreach my $exp_qual (keys %{$exp_qualifier{$gene}{$go}{$ev_id}}){
-                        if ((exists($positive_quals{$exp_qual}) && exists($positive_quals{$qual})) || (exists($negative_quals{$exp_qual}) && exists($negative_quals{$qual}))) {
+                        if ($qual eq $exp_qual) {
                             # IBA qualifier is valid if agreement w/ any same-term experimental annotation qualifier
                             $qual_supported=1;
                         }