From 3b6f1c3aff7726b544884295fcfeaefb8574b25f Mon Sep 17 00:00:00 2001 From: Carlos Salguero Date: Fri, 10 Mar 2017 14:51:43 -0300 Subject: [PATCH] PT-96 Fixes for ChangeHandler & TableSync --- lib/ChangeHandler.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/ChangeHandler.pm b/lib/ChangeHandler.pm index c4c2262c..33aaa9a6 100644 --- a/lib/ChangeHandler.pm +++ b/lib/ChangeHandler.pm @@ -402,7 +402,6 @@ sub make_row { my $q = $self->{Quoter}; my $type_for = $self->{tbl_struct}->{type_for}; - # sorts here are just to make this sub testeable return "$verb INTO $self->{dst_db_tbl}(" . join(', ', map { $q->quote($_) } @cols) . ') VALUES (' @@ -417,6 +416,7 @@ sub make_row { ) } @cols) . ')'; + } # Sub: make_where_clause @@ -483,7 +483,7 @@ sub sort_cols { 1; } } - keys %$row; + sort keys %$row; push @cols, @not_in_tbl if @not_in_tbl; } else {