[Bio] / FigKernelScripts / svr_function_of.pl Repository:
ViewVC logotype

Diff of /FigKernelScripts/svr_function_of.pl

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

revision 1.7, Tue Oct 5 15:49:35 2010 UTC revision 1.8, Wed Mar 16 20:05:00 2011 UTC
# Line 70  Line 70 
70  my $functions = $sapObject->ids_to_functions(-ids => \@fids);  my $functions = $sapObject->ids_to_functions(-ids => \@fids);
71  foreach $_ (@lines)  foreach $_ (@lines)
72  {  {
73        my $func = $functions->{$_->[$column-1]};
74        if (! $func) { $func = '' }
75      print join("\t",@$_,$functions->{$_->[$column-1]}),"\n";      print join("\t",@$_,$functions->{$_->[$column-1]}),"\n";
76  }  }

Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3