Fix require line to check for location of find_species.pl

svn path=/; revision=55

diff --git a/interactome_scripts/supercluster.pl b/interactome_scripts/supercluster.pl
index 66439a986d296cdc9c2c1195382d47bf8956622b..4425ee5303ddc675a6b36a73ae534eacd0742375 100755 (executable)
--- a/interactome_scripts/supercluster.pl
+++ b/interactome_scripts/supercluster.pl
@@ -25,7 +25,11 @@ use strict;
 use DBI;
 use Term::Screen::ReadLine;
 
-require "$ENV{HOME}/scripts/jaiswallab/interactome_scripts/find_species.pl";
+if(-e "$ENV{HOME}/scripts/jaiswallab/interactome_scripts/find_species.pl") {
+       require "$ENV{HOME}/scripts/jaiswallab/interactome_scripts/find_species.pl";
+}elsif(-e "$ENV{HOME}/bin/find_species.pl") {
+       require "$ENV{HOME}/bin/find_species.pl";
+}
 
 # define the database handle to be used