Extensions.pm 1.71 KB
Newer Older
Jessica Severin's avatar
Jessica Severin committed
1 2 3
=pod 

=head1 NAME
Jessica Severin's avatar
Jessica Severin committed
4

5
    Bio::EnsEMBL::Hive::Extensions
Jessica Severin's avatar
Jessica Severin committed
6

7
=head1 DESCRIPTION
Jessica Severin's avatar
Jessica Severin committed
8

9
    Performs method injection into (mainly) ensembl-core classes
Jessica Severin's avatar
Jessica Severin committed
10

11
=head1 LICENSE
Jessica Severin's avatar
Jessica Severin committed
12

13
    Copyright [1999-2015] Wellcome Trust Sanger Institute and the EMBL-European Bioinformatics Institute
Matthieu Muffato's avatar
Matthieu Muffato committed
14
    Copyright [2016-2018] EMBL-European Bioinformatics Institute
Jessica Severin's avatar
Jessica Severin committed
15

16 17
    Licensed under the Apache License, Version 2.0 (the "License"); you may not use this file except in compliance with the License.
    You may obtain a copy of the License at
Jessica Severin's avatar
Jessica Severin committed
18

19 20 21 22 23 24 25
         http://www.apache.org/licenses/LICENSE-2.0

    Unless required by applicable law or agreed to in writing, software distributed under the License
    is distributed on an "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
    See the License for the specific language governing permissions and limitations under the License.

=head1 CONTACT
Jessica Severin's avatar
Jessica Severin committed
26

27
    Please subscribe to the Hive mailing list:  http://listserver.ebi.ac.uk/mailman/listinfo/ehive-users  to discuss Hive-related questions or to be notified of our updates
Jessica Severin's avatar
Jessica Severin committed
28

Jessica Severin's avatar
Jessica Severin committed
29 30
=cut

31

Jessica Severin's avatar
Jessica Severin committed
32 33
use strict;

34 35 36 37
#######################################
# extensions to
# Bio::EnsEMBL::Pipeline::RunnableDB
#######################################
38

39 40 41 42 43 44 45
sub Bio::EnsEMBL::Pipeline::RunnableDB::debug {
  my $self = shift;
  $self->{'_debug'} = shift if(@_);
  $self->{'_debug'}=0 unless(defined($self->{'_debug'}));  
  return $self->{'_debug'};
}

46 47 48 49 50
#######################################
# extensions to
# Bio::EnsEMBL::Analysis::RunnableDB
#######################################

51 52 53 54 55 56 57
sub Bio::EnsEMBL::Analysis::RunnableDB::debug {
  my $self = shift;
  $self->{'_debug'} = shift if(@_);
  $self->{'_debug'}=0 unless(defined($self->{'_debug'}));  
  return $self->{'_debug'};
}

Jan-Hinnerk Vogel's avatar
 
Jan-Hinnerk Vogel committed
58
 
Jessica Severin's avatar
Jessica Severin committed
59 60
1;