diff --git a/modules/Bio/EnsEMBL/DBSQL/StatementHandle.pm b/modules/Bio/EnsEMBL/DBSQL/StatementHandle.pm
index 60617eec1bee7f4843584341b40326ddb071118c..787367660c814004ac6407a7cce5481152a4cf6f 100644
--- a/modules/Bio/EnsEMBL/DBSQL/StatementHandle.pm
+++ b/modules/Bio/EnsEMBL/DBSQL/StatementHandle.pm
@@ -76,32 +76,32 @@ sub sql {
 #
 # uncomment this for printing out handy debug information (every query)
 #
-sub execute {
-   my $self = shift;
-
-   my $sql = $self->sql();
-
-
-   my @chrs = split(//, $sql);
-
-   my $j = 0;
-   for(my $i =0; $i < @chrs; $i++) {
-     $chrs[$i] = $_[$j++] if($chrs[$i] eq '?' && defined($_[$j]));
-   }
-
-   my $str = join('', @chrs);
-
-   my $time = time;
-#   print STDERR "\nSQL:\n$str\n\n";
-
- #  print STDERR stack_trace_dump(), "\n";
-
-   my $res = $self->SUPER::execute(@_);
-   $time = time - $time;
-#   print STDERR "DONE ($time)\n";
-
-   return $res;
- }
+#sub execute {
+#   my $self = shift;
+#
+#   my $sql = $self->sql();
+#
+#
+#   my @chrs = split(//, $sql);
+#
+#   my $j = 0;
+#   for(my $i =0; $i < @chrs; $i++) {
+#     $chrs[$i] = $_[$j++] if($chrs[$i] eq '?' && defined($_[$j]));
+#   }
+#
+#   my $str = join('', @chrs);
+#
+#   my $time = time;
+##   print STDERR "\nSQL:\n$str\n\n";
+#
+# #  print STDERR stack_trace_dump(), "\n";
+#
+#   my $res = $self->SUPER::execute(@_);
+#   $time = time - $time;
+##   print STDERR "DONE ($time)\n";
+#
+#   return $res;
+# }
 
 
 sub DESTROY {