EnsEMBL::Web::Component::Website AddSpecies
Included librariesPackage variablesGeneral documentationMethods
Toolbar
WebCvsRaw content
Package variables
No package variables defined.
Included modules
EnsEMBL::Web::Data::Species
Inherit
EnsEMBL::Web::Component
Synopsis
No synopsis!
Description
No description!
Methods
_init
No description
Code
caption
No description
Code
content
No description
Code
Methods description
None available.
Methods code
_initdescriptionprevnextTop
sub _init {
  my $self = shift;
  $self->cacheable( 0 );
  $self->ajaxable(  0 );
}
captiondescriptionprevnextTop
sub caption {
  my $self = shift;
  return '';
}
contentdescriptionprevnextTop
sub content {
  my $self = shift;
  my $object = $self->object;
  my $html = '<h1>Add a new species</h1>';

  my $form = EnsEMBL::Web::Form->new('add_species', '/Website/SaveSpecies', 'post');

  $form->add_element(
    'name' => 'name',
    'type' => 'String',
    'label' => 'Binomial name',
    'value' => $object->param('name'),
    'required' => 'yes',
  );
  $form->add_element(
    'name' => 'common_name',
    'type' => 'String',
    'label' => 'Common name',
    'value' => $object->param('common_name'),
    'required' => 'yes',
  );
  $form->add_element(
    'name' => 'assembly',
    'type' => 'String',
    'label' => 'Current assembly',
    'value' => $object->param('assembly'),
    'required' => 'yes',
  );
  $form->add_element(
    'name' => 'submit',
    'type' => 'Submit',
    'value' => 'Save',
  );

  $html .= $form->render;
  return $html;
}

1;
}
General documentation
No general documentation available.