None available.
sub process
{ my $self = shift;
my $object = $self->object;
my $data;
my $interface = EnsEMBL::Web::Interface->new();
$data = EnsEMBL::Web::Data::Faq->new($object->param('id'));
$interface->data($data);
$interface->discover;
my @keywords = (
{'name' => 'Webpage', 'value' => 'web'},
{'name' => 'Core API', 'value' => 'core'},
{'name' => 'Compara API', 'value' => 'compara'},
{'name' => 'Variation API', 'value' => 'variation'},
{'name' => 'Funcgen API', 'value' => 'funcgen'},
);
$interface->modify_element('keyword', {'type' => 'DropDown', 'label' => 'Type', 'values' =>\@ keywords, 'select' => 'select'});
$interface->modify_element('content', {'type' => 'Html'});
$interface->element_order(['keyword', 'question', 'answer', 'status']);
$interface->dropdown(1);
$interface->option_columns(['keyword', 'question']);
$interface->configure($self->webpage, $object);
}
}
1; } |