Commit 6a1bfadb authored by Matej Lexa's avatar Matej Lexa
Browse files

Fixed a bug in last sequence TSD generation

parent 93a9d039

nested/utils/add_tsd2fa.pl

+2 −2
Original line number Diff line number Diff line
@@ -28,8 +28,8 @@ while($_=<STDIN>){ 


}



#$tsd = `grep -v \"^>\" $files \| grep .\| shuf \| head -1 \| egrep -o \"[A-Za-z]+\$\" \| cat`;

#chop($tsd);

$tsd = `grep -v \"^>\" $files \| grep . \| shuf \| head -1 \| egrep -o \"[A-Za-z]+\$\" \| cat`;

chop($tsd);

print "$tsd$sequence$tsd\n\n";



exit(1);