Summary | Included libraries | Package variables | Synopsis | Description | General documentation | Methods |
WebCvs | Raw content |
description | Description | Code |
display_label | Description | Code |
name | Description | Code |
new | Description | Code |
description | code | next | Top |
Arg [1] : string - description |
display_label | code | prev | next | Top |
Arg [1] : (optional) string - description |
name | code | prev | next | Top |
Arg [1] : string - name |
new | code | prev | next | Top |
Arg [-name] : string - name of CellType |
description | description | prev | next | Top |
my $self = shift; $self->{'description'} = shift if @_; return $self->{'description'};}
display_label | description | prev | next | Top |
my $self = shift; $self->{'display_label'} = shift if @_; #This may result in very long dispay_labels}
#if(! defined $self->{'display_label'}){
# $self->{'display_label'} = (defined $self->{'desciption'}) ? $self->description()." (".$self->name().")" : $self->name();
#}
return $self->{'display_label'};
name | description | prev | next | Top |
my $self = shift; $self->{'name'} = shift if @_; return $self->{'name'};}
new | description | prev | next | Top |
my $caller = shift; my $class = ref($caller) || $caller; my $self = $class->SUPER::new(@_); my ( $name, $dlabel, $desc, ) = rearrange([ 'NAME', 'DISPLAY_LABEL', 'DESCRIPTION', ], @_); throw("Must supply a CellType name\n") if ! $name; $self->name($name); $self->display_label($dlabel) if $dlabel; $self->description($desc) if $desc; return $self;}
AUTHOR | Top |
CONTACT | Top |
class | Top |
Arg [1] : (optional) string - class
Example : $ft->class('HISTONE');
Description: Getter and setter of description attribute for FeatureType
objects.
Returntype : string
Exceptions : None
Caller : General
Status : Low Risk