From 6ad9f7a8072d1c4c107ea9c9139b5ff13d0c369e Mon Sep 17 00:00:00 2001
From: Graham McVicker <mcvicker@sanger.ac.uk>
Date: Fri, 22 Nov 2002 17:10:55 +0000
Subject: [PATCH] removed more deprecated methods

---
 .../DBSQL/ProxyDnaAlignFeatureAdaptor.pm      | 10 +----
 modules/Bio/EnsEMBL/DBSQL/ProxyGeneAdaptor.pm | 22 ----------
 .../DBSQL/ProxyRepeatFeatureAdaptor.pm        | 19 ---------
 modules/Bio/EnsEMBL/DBSQL/ProxySNPAdaptor.pm  | 22 ----------
 modules/Bio/EnsEMBL/DBSQL/RawContigAdaptor.pm | 41 -------------------
 modules/Bio/EnsEMBL/DBSQL/SequenceAdaptor.pm  | 27 ------------
 6 files changed, 1 insertion(+), 140 deletions(-)

diff --git a/modules/Bio/EnsEMBL/DBSQL/ProxyDnaAlignFeatureAdaptor.pm b/modules/Bio/EnsEMBL/DBSQL/ProxyDnaAlignFeatureAdaptor.pm
index cd3bb199ed..ef56055cca 100644
--- a/modules/Bio/EnsEMBL/DBSQL/ProxyDnaAlignFeatureAdaptor.pm
+++ b/modules/Bio/EnsEMBL/DBSQL/ProxyDnaAlignFeatureAdaptor.pm
@@ -154,12 +154,4 @@ sub remove {
   return $self->{'_primary_adaptor'}->remove($feature);
 }
 
-
-
-
-
-
-
-
-
-
+1;
diff --git a/modules/Bio/EnsEMBL/DBSQL/ProxyGeneAdaptor.pm b/modules/Bio/EnsEMBL/DBSQL/ProxyGeneAdaptor.pm
index 58560a1915..64ab53bcd6 100644
--- a/modules/Bio/EnsEMBL/DBSQL/ProxyGeneAdaptor.pm
+++ b/modules/Bio/EnsEMBL/DBSQL/ProxyGeneAdaptor.pm
@@ -74,28 +74,6 @@ sub fetch_all_by_Slice {
 
 
 
-=head2 fetch_by_Slice
-
-  Arg [1]    : none
-  Example    : none
-  Description: DEPRECATED use fetch_all_by_Slice instead
-  Returntype : none
-  Exceptions : none
-  Caller     : none
-
-=cut
-
-sub fetch_by_Slice {
-  my ($self, @args) = @_;
-
-  $self->warn("fetch_by_Slice has been renamed fetch_all_by_Slice\n" . caller);
-
-  return $self->fetch_all_by_Slice(@args);
-}
-
-
-
-
 =head2 fetch_by_transcript_stable_id
 
   Arg [1]    : list of arbitrary args @args
diff --git a/modules/Bio/EnsEMBL/DBSQL/ProxyRepeatFeatureAdaptor.pm b/modules/Bio/EnsEMBL/DBSQL/ProxyRepeatFeatureAdaptor.pm
index 26c52d4f92..9788ac122a 100644
--- a/modules/Bio/EnsEMBL/DBSQL/ProxyRepeatFeatureAdaptor.pm
+++ b/modules/Bio/EnsEMBL/DBSQL/ProxyRepeatFeatureAdaptor.pm
@@ -68,24 +68,5 @@ sub fetch_all_by_Slice {
 }
 
 
-=head2 fetch_by_Slice
-
-  Arg [1]    : none
-  Example    : none
-  Description: DEPRECATED use fetch_all_by_Slice instead
-  Returntype : none
-  Exceptions : none
-  Caller     : none
-
-=cut
-
-sub fetch_by_Slice {
-  my ($self, @args) = @_;
-
-  $self->warn("fetch_by_Slice has been renamed fetch_all_by_Slice\n" . caller);
-
-  return $self->fetch_all_by_Slice(@args);
-}
-
 1;
 
diff --git a/modules/Bio/EnsEMBL/DBSQL/ProxySNPAdaptor.pm b/modules/Bio/EnsEMBL/DBSQL/ProxySNPAdaptor.pm
index 983b8d80fb..9956afa9d8 100644
--- a/modules/Bio/EnsEMBL/DBSQL/ProxySNPAdaptor.pm
+++ b/modules/Bio/EnsEMBL/DBSQL/ProxySNPAdaptor.pm
@@ -76,28 +76,6 @@ sub fetch_all_by_Slice {
 }
 
 
-
-=head2 fetch_by_Slice
-
-  Arg [1]    : none
-  Example    : none
-  Description: DEPRECATED use fetch_all_by_Slice instead
-  Returntype : none
-  Exceptions : none
-  Caller     : none
-
-=cut
-
-sub fetch_by_Slice {
-  my ($self, @args) = @_;
-
-  $self->warn("fetch_by_Slice has been renamed fetch_all_by_Slice\n" . caller);
-
-  return $self->fetch_all_by_Slice(@args);
-}
-
-
-
 =head2 fetch_by_SNP_id
 
   Arg [1]    : list of arbitrary args @args
diff --git a/modules/Bio/EnsEMBL/DBSQL/RawContigAdaptor.pm b/modules/Bio/EnsEMBL/DBSQL/RawContigAdaptor.pm
index 274152c0d1..7128292f3b 100644
--- a/modules/Bio/EnsEMBL/DBSQL/RawContigAdaptor.pm
+++ b/modules/Bio/EnsEMBL/DBSQL/RawContigAdaptor.pm
@@ -535,47 +535,6 @@ sub deleteObj {
 
 
 
-
-=head2 fetch_by_clone
-
-  Arg [1]    : none
-  Example    : none
-  Description: DEPRECATED use fetch_all_by_Clone instead
-  Returntype : none
-  Exceptions : none
-  Caller     : none
-
-=cut
-
-sub fetch_by_clone {
-  my ($self, @args) = @_;
-  
-  print STDERR "fetch_by_clone has been renamed fetch_all_by_Clone\n" . caller;
-
-  return $self->fetch_by_Clone(@args);
-}
-
-
-=head2 fetch_by_Clone
-
-  Arg [1]    : none
-  Example    : none
-  Description: DEPRECATED use fetch_all_by_Clone instead
-  Returntype : none
-  Exceptions : none
-  Caller     : none
-
-=cut
-
-sub fetch_by_Clone {
-  my ($self, @args) = @_;
-
-  $self->warn("fetch_by_Clone has been renamed fetch_all_by_Clone\n" . caller);
-
-  return $self->fetch_all_by_Clone(@args);
-}
-
-
 =head2 remove
 
   Arg [1]    : Bio::EnsEMBL::RawContig $contig
diff --git a/modules/Bio/EnsEMBL/DBSQL/SequenceAdaptor.pm b/modules/Bio/EnsEMBL/DBSQL/SequenceAdaptor.pm
index f1f26e6ba1..32f92b5d54 100644
--- a/modules/Bio/EnsEMBL/DBSQL/SequenceAdaptor.pm
+++ b/modules/Bio/EnsEMBL/DBSQL/SequenceAdaptor.pm
@@ -305,31 +305,4 @@ sub _reverse_comp {
 }
 
 
-
-
-
-
-=head2 fetch_by_Contig_start_end_strand
-
-  Arg [1]    : none
-  Example    : none
-  Description: DEPRECATED use fetch_by_RawContig_start_end_strand instead
-  Returntype : none
-  Exceptions : none
-  Caller     : none
-
-=cut
-
-sub fetch_by_Contig_start_end_strand {
-  my ($self, @args) = @_;
-
-  $self->warn("fetch_by_Contig_start_end_strand has been renamed fetch_by_RawContig_start_end_strand\n" . caller);
-
-  return $self->fetch_by_RawContig_start_end_strand(@args);
-}
-
-
-
-
-
 1;
-- 
GitLab