From: elserj <elserj@localhost>
Date: Tue, 16 Dec 2014 23:34:12 +0000 (+0000)
Subject: Add source and progress indicator
X-Git-Url: http://gitweb.planteome.org/?a=commitdiff_plain;h=0c1c1a0d0db1b3c96e37bca4586e6cafe262844e;p=old-jaiswallab-svn%2F.git

Add source and progress indicator

svn path=/; revision=593
---

diff --git a/interactome_scripts/po_obsolete_check.pl b/interactome_scripts/po_obsolete_check.pl
index 657e390..666a7dc 100755
--- a/interactome_scripts/po_obsolete_check.pl
+++ b/interactome_scripts/po_obsolete_check.pl
@@ -37,7 +37,7 @@ my $out_file = $ARGV[2];
 my @assoc_files = glob("$assoc_dir*.assoc");
 # if the files had a differenct extension, like .txt check here
 if ($#assoc_files == 0) {
-	my @assoc_files = glob("$assoc_dir*.txt");
+	my @assoc_files = glob("$assoc_dir*.assoc");
 }
 
 # init GO parser
@@ -60,7 +60,7 @@ foreach my $term (@$obo_terms) {
 	}
 }
 
-my @source_array = ('sgn','tair','gramene','maizegdb','nasc', 'jaiswallab', 'cosmoss', 'AgBase');
+my @source_array = ('sgn','tair','gramene','maizegdb','nasc', 'jaiswallab', 'cosmoss', 'AgBase', 'poc');
 
 my %bad_term_hash;
 
@@ -71,6 +71,8 @@ foreach my $file (@assoc_files) {
 	
 	$file = fileparse($file);
 	
+	print "checking file: $file\n";
+	
 	my $source_db;
 	foreach my $source (@source_array) {
 		if ($file =~ /$source/i) {