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

Diff of /FigKernelPackages/FigFam.pm

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

revision 1.45, Mon May 7 00:43:26 2007 UTC revision 1.46, Mon May 7 16:14:26 2007 UTC
# Line 119  Line 119 
119                   `cat \"$dir/PEGs\"`                   `cat \"$dir/PEGs\"`
120                  ];                  ];
121    
122        if (@$pegsL < 2)
123        {
124            system "/bin/rm -r $dir";
125            retun undef;
126        }
127    
128      $fam->{pegsL} = $pegsL;      $fam->{pegsL} = $pegsL;
129      my $pegsH = {};      my $pegsH = {};
130      foreach $peg (@$pegsL)      foreach $peg (@$pegsL)

Legend:
Removed from v.1.45  
changed lines
  Added in v.1.46

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3