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

Diff of /FigKernelPackages/FFserver.pm

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

revision 1.3, Thu May 7 22:07:13 2009 UTC revision 1.4, Fri May 8 17:08:14 2009 UTC
# Line 25  Line 25 
25  sub members_of_families  sub members_of_families
26  {  {
27      my($self, @ids) = @_;      my($self, @ids) = @_;
28      my $form = [ (map  { (id => $_)  } @ids), function => 'members_of_families'];      return $self->run_query('members_of_families', @ids);
29    }
30    
31    sub should_be_member
32    {
33        my($self, @id_seq_pairs) = @_;
34        return $self->run_query('should_be_member', @id_seq_pairs);
35    }
36    
37    sub all_families
38    {
39        my($self) = @_;
40        return $self->run_query('all_families');
41    }
42    
43    sub run_query
44    {
45        my($self, $function, @args ) = @_;
46        my $form = [function  => $function,
47                    args => YAML::Dump(@args),
48                    ];
49      return $self->run_query_form($form);      return $self->run_query_form($form);
50  }  }
51    

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3