From 5f6e9455aa1f65fb86fbe54bd5b2a141fd166a73 Mon Sep 17 00:00:00 2001
From: elserj <elserj@localhost>
Date: Mon, 30 Jan 2012 21:46:02 +0000
Subject: [PATCH] Updated for newer version of physcomitrella fasta file

svn path=/; revision=285
---
 interactome_scripts/find_species.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/interactome_scripts/find_species.pl b/interactome_scripts/find_species.pl
index e1e25b4..4f78afd 100755
--- a/interactome_scripts/find_species.pl
+++ b/interactome_scripts/find_species.pl
@@ -240,8 +240,8 @@ sub find_gene {
 		my ($gene_id, $temp) = split(/\s/, $gene_header);
 		$gene = $gene_id;
 	}elsif ($species eq "Physcomitrella_patens") {
-		my ($name,$locus_id,$scaffold,$prot_id) = split(/\|/,$gene_header);
-		$gene = $prot_id; #???
+		my ($name,$pac_id) = split(/\|/,$gene_header);
+		$gene = $name; #???
 	}elsif ($species eq "Populus_trichocarpa") {
 		my ($gene_id,$transcript_id) = split(/\|/,$gene_header);
 		$gene = $transcript_id;
-- 
2.34.1