From: Ash Berlin <ash_github@firemirror.com>
Date: Thu, 20 Dec 2007 17:23:44 +0000 (+0000)
Subject: Remove breakpoints
X-Git-Tag: v0.11008~348^2~10
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=17945694aeb9a55e84beea19cad1d370e9d5b67b;p=dbsrgits%2FSQL-Translator.git

Remove breakpoints
---

diff --git a/lib/SQL/Translator/Diff.pm b/lib/SQL/Translator/Diff.pm
index ac49b57..9692e1c 100644
--- a/lib/SQL/Translator/Diff.pm
+++ b/lib/SQL/Translator/Diff.pm
@@ -79,7 +79,6 @@ sub compute_differences {
 
     if (my $preprocess = $producer_class->can('preprocess_schema')) {
       $producer_class->$preprocess($source_schema);
-      $DB::single = 1;
       $producer_class->$preprocess($target_schema);
     }
 
@@ -87,7 +86,6 @@ sub compute_differences {
     ## do original/source tables exist in target?
     for my $tar_table ( @tar_tables ) {
       my $tar_table_name = $tar_table->name;
-      $DB::single = 1 if $tar_table_name eq 'admin_contest';
       my $src_table      = $source_schema->get_table( $tar_table_name, $self->case_insensitive );
 
       unless ( $src_table ) {
@@ -307,7 +305,6 @@ sub diff_table_fields {
   for my $tar_table_field ( $tar_table->get_fields ) {
     my $f_tar_name      = $tar_table_field->name;
 
-    $DB::single = 1 if $f_tar_name eq 'invite_type';
     if (my $old_name = $tar_table_field->extra->{renamed_from}) {
       my $src_table_field = $src_table->get_field( $old_name, $self->case_insensitive );
       die qq#Renamed cant find "@{[$src_table->name]}.$old_name" for renamed column\n# unless $src_table_field;