[Bio] / FigKernelPackages / Observation.pm Repository:
ViewVC logotype

Diff of /FigKernelPackages/Observation.pm

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

revision 1.81, Thu Aug 27 13:58:34 2009 UTC revision 1.82, Thu Aug 27 14:04:21 2009 UTC
# Line 1797  Line 1797 
1797      my $hit_stop = $thing->hstop;      my $hit_stop = $thing->hstop;
1798      my $ln_query = $thing->qlength;      my $ln_query = $thing->qlength;
1799      my $ln_hit = $thing->hlength;      my $ln_hit = $thing->hlength;
 #    my $query_color = match_color($query_start, $query_stop, $ln_query, 1);  
 #    my $hit_color = match_color($hit_start, $hit_stop, $ln_hit, 1);  
1800      my $query_color = match_color($query_start, $query_stop, abs($query_stop-$query_start)+1, 1);      my $query_color = match_color($query_start, $query_stop, abs($query_stop-$query_start)+1, 1);
1801      my $hit_color = match_color($hit_start, $hit_stop, abs($query_stop-$query_start)+1, 1);      my $hit_color = match_color($hit_start, $hit_stop, abs($query_stop-$query_start)+1, 1);
1802    
# Line 2239  Line 2237 
2237              $iden    = $thing->identity;              $iden    = $thing->identity;
2238              $organism= $thing->organism;              $organism= $thing->organism;
2239              $ln1     = $thing->qlength;              $ln1     = $thing->qlength;
2240                if ($ln1 < 1) { $ln1 = 1; }
2241              $ln2     = $thing->hlength;              $ln2     = $thing->hlength;
2242                if ($ln2 < 1) { $ln2 = 1; }
2243              $b1      = $thing->qstart;              $b1      = $thing->qstart;
2244              $e1      = $thing->qstop;              $e1      = $thing->qstop;
2245              $b2      = $thing->hstart;              $b2      = $thing->hstart;

Legend:
Removed from v.1.81  
changed lines
  Added in v.1.82

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3