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

Diff of /Sprout/SproutLoad.pm

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

revision 1.50, Sun Jul 9 21:16:47 2006 UTC revision 1.51, Mon Jul 10 21:12:51 2006 UTC
# Line 370  Line 370 
370                  Trace("Processing PEG $peg1 for $genome.") if T(4);                  Trace("Processing PEG $peg1 for $genome.") if T(4);
371                  # Get a list of the coupled PEGs.                  # Get a list of the coupled PEGs.
372                  my @couplings = $fig->coupled_to($peg1);                  my @couplings = $fig->coupled_to($peg1);
373                    Trace(scalar(@couplings) . " couplings found for $peg1.") if T(4);
374                  # For each coupled PEG, we need to verify that a coupling already                  # For each coupled PEG, we need to verify that a coupling already
375                  # exists. If not, we have to create one.                  # exists. If not, we have to create one.
376                  for my $coupleData (@couplings) {                  for my $coupleData (@couplings) {

Legend:
Removed from v.1.50  
changed lines
  Added in v.1.51

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3