[Bio] / FigKernelScripts / check_starts_for_pegs.pl Repository:
ViewVC logotype

Diff of /FigKernelScripts/check_starts_for_pegs.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1, Sat Aug 20 02:37:22 2005 UTC revision 1.2, Mon Aug 22 14:08:27 2005 UTC
# Line 18  Line 18 
18    
19          if (($loc = $fig->feature_location($peg)) && ($tran = $fig->get_translation($peg)))          if (($loc = $fig->feature_location($peg)) && ($tran = $fig->get_translation($peg)))
20          {          {
21              ($recalled,$conf,$tranR,$proposed) = $fig->call_start(&FIG::genome_of($peg),$loc,$tran,\@pegs);              ($recalled,$conf,$tranR,$proposed,$objects) = $fig->call_start(&FIG::genome_of($peg),$loc,$tran,\@pegs);
22              if ($recalled && ($recalled ne $loc))              if ($recalled && ($recalled ne $loc))
23              {              {
24                  print "$peg\t$loc\t$recalled\t$conf\t$tranR\n";                  print "$peg\t$loc\t$recalled\t$conf\t$tranR\n";

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3