Skip to content
Snippets Groups Projects
Commit 217897a6 authored by Glenn Proctor's avatar Glenn Proctor
Browse files

Add support for positive and negative enhancer types.

parent 00f8784d
No related branches found
No related tags found
No related merge requests found
......@@ -56,6 +56,11 @@ sub validate_type {
my ($db_adaptor, $type) = @_;
# LBL enhancers have both positive and negative varieties
if (lc($type) eq 'enhancer') {
return (validate_type($db_adaptor, 'enhancer_positive') &&validate_type($db_adaptor, 'enhancer_negative'));
}
my $sth = $db_adaptor->dbc->prepare("SELECT analysis_id FROM analysis WHERE LOWER(logic_name)=?");
$sth->execute(lc($type));
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment