None available.
sub process
{ my $self = shift;
my $object = $self->object;
my $data;
my $interface = EnsEMBL::Web::Interface->new();
$data = EnsEMBL::Web::Data::Glossary->new($object->param('id'));
$interface->data($data);
$interface->discover;
$interface->modify_element('word', {'required' => 'yes'});
$interface->modify_element('meaning', {'required' => 'yes'});
$interface->element_order(['word', 'expanded', 'meaning', 'status']);
$interface->dropdown(1);
$interface->option_columns(['word']);
$interface->configure($self->webpage, $object);
}
}
1; } |