[Bio] / Sprout / Sprout.pm Repository:
ViewVC logotype

Diff of /Sprout/Sprout.pm

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

revision 1.26, Tue Sep 13 18:33:20 2005 UTC revision 1.28, Wed Sep 14 13:01:40 2005 UTC
# Line 769  Line 769 
769              $start = $beg;              $start = $beg;
770              $stop = $beg + $len - 1;              $stop = $beg + $len - 1;
771          } else {          } else {
772              $start = $beg + $len + 1;              $start = $beg - $len + 1;
773              $stop = $beg;              $stop = $beg;
774          }          }
775          my $query = $self->Get(['IsMadeUpOf','Sequence'],          my $query = $self->Get(['IsMadeUpOf','Sequence'],
# Line 793  Line 793 
793          if ($dir eq '+') {          if ($dir eq '+') {
794              $retVal .= $locationDNA;              $retVal .= $locationDNA;
795          } else {          } else {
796              $locationDNA = join('', reverse split //, $locationDNA);              $retVal .= FIG::reverse_comp($locationDNA);
             $retVal .= $locationDNA;  
797          }          }
798      }      }
799      # Return the result.      # Return the result.

Legend:
Removed from v.1.26  
changed lines
  Added in v.1.28

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3