From: Dagfinn Ilmari Mannsåker <ilmari@ilmari.org>
Date: Mon, 28 Jul 2014 23:20:31 +0000 (+0100)
Subject: Return FK info in a deterministic order in ::DBI::InterBase
X-Git-Tag: 0.07041~18
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=4825ee09a9964a7b6c0e2de27f767d85970bb7dd;hp=7336f5dc45f7b330b6ea21b31edb3591de0b2d40;p=dbsrgits%2FDBIx-Class-Schema-Loader.git

Return FK info in a deterministic order in ::DBI::InterBase
---

diff --git a/lib/DBIx/Class/Schema/Loader/DBI/InterBase.pm b/lib/DBIx/Class/Schema/Loader/DBI/InterBase.pm
index 0fecdbb..44bb9bc 100644
--- a/lib/DBIx/Class/Schema/Loader/DBI/InterBase.pm
+++ b/lib/DBIx/Class/Schema/Loader/DBI/InterBase.pm
@@ -121,7 +121,7 @@ EOF
         );
     }
 
-    foreach my $fk (keys %$remote_table) {
+    foreach my $fk (sort keys %$remote_table) {
         push @rels, {
             local_columns => $local_cols->{$fk},
             remote_columns => $remote_cols->{$fk},