[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.58, Tue Jul 10 19:32:22 2007 UTC revision 1.59, Sat Sep 15 22:33:31 2007 UTC
# Line 123  Line 123 
123      my($peg,$pegs);      my($peg,$pegs);
124      my $pegsL = [      my $pegsL = [
125                   sort { &FIG::by_fig_id($a,$b) }                   sort { &FIG::by_fig_id($a,$b) }
126                   grep { scalar $fig->function_of($_) eq $func }  #                grep { scalar $fig->function_of($_) eq $func }
127                   grep { $fig->is_real_feature($_) }                   grep { $fig->is_real_feature($_) }
128                   map { $_ =~ /^\S+\t(\S+)/; $1 }                   map { $_ =~ /^\S+\t(\S+)/; $1 }
129                   `cat \"$dir/PEGs\"`                   `cat \"$dir/PEGs\"`

Legend:
Removed from v.1.58  
changed lines
  Added in v.1.59

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3