diff --git a/modules/Bio/EnsEMBL/Pipeline/Production/DensityGenerator.pm b/modules/Bio/EnsEMBL/Pipeline/Production/DensityGenerator.pm index 63fec1d53f75765348ca67976f452b623066e27e..349c62b74e0a8f98eaae89dfa9c1a35638db5bf9 100644 --- a/modules/Bio/EnsEMBL/Pipeline/Production/DensityGenerator.pm +++ b/modules/Bio/EnsEMBL/Pipeline/Production/DensityGenerator.pm @@ -26,8 +26,6 @@ sub run { $self->check_analysis($dba); my $density_type = $self->get_density_type($analysis); - #Have to delete the density types linked to the analysis - $self->_delete_density_type_by_Analysis($analysis); Bio::EnsEMBL::Registry->get_adaptor($species, 'core', 'DensityType')->store($density_type); my $slices = Bio::EnsEMBL::Registry->get_adaptor($species, 'core', 'slice')->fetch_all('toplevel'); my $option = $self->get_option(); @@ -205,16 +203,6 @@ sub get_biotype_group { return @biotypes; } -#Delete a density type by the analysis object if there were no density features linked -sub _delete_density_type_by_Analysis { - my ($self, $analysis) = @_; - my $dba = $self->get_DBAdaptor(); - return $dba->dbc()->sql_helper()->execute_update( - -SQL => 'delete density_type where analysis_id =?', - -PARAMS => [$analysis->dbID()] - ); -} - # Empty method if no specific option is needed sub get_option { my $self = @_;