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

Diff of /FigKernelPackages/FIG.pm

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

revision 1.145, Tue Aug 24 22:12:17 2004 UTC revision 1.146, Fri Aug 27 18:32:07 2004 UTC
# Line 2993  Line 2993 
2993    
2994  ################ Assignments of Function to PEGs  ##########################  ################ Assignments of Function to PEGs  ##########################
2995    
2996    # set to undef to unset user
2997    #
2998    sub set_user {
2999        my($self,$user) = @_;
3000    
3001        $self->{_user} = $user;
3002    }
3003    
3004    sub get_user {
3005        my($self) = @_;
3006    
3007        return $self->{_user};
3008    }
3009    
3010  =pod  =pod
3011    
3012  =head1 function_of  =head1 function_of

Legend:
Removed from v.1.145  
changed lines
  Added in v.1.146

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3