X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FSchema%2FLoader%2FDBI%2FInformix.pm;h=6ca0a2f40af826fcde77471f000114c08fd179c1;hb=c52f11c91a8570f84daf2bfbbf60fa1ef3b32b5b;hp=c0f2798fad2598c7036c45155470fb831626ff13;hpb=c819561ab07117cbe62d10cd64988ca811ad9149;p=dbsrgits%2FDBIx-Class-Schema-Loader.git diff --git a/lib/DBIx/Class/Schema/Loader/DBI/Informix.pm b/lib/DBIx/Class/Schema/Loader/DBI/Informix.pm index c0f2798..6ca0a2f 100644 --- a/lib/DBIx/Class/Schema/Loader/DBI/Informix.pm +++ b/lib/DBIx/Class/Schema/Loader/DBI/Informix.pm @@ -10,7 +10,7 @@ use Try::Tiny; use namespace::clean; use DBIx::Class::Schema::Loader::Table::Informix (); -our $VERSION = '0.07024'; +our $VERSION = '0.07042'; =head1 NAME @@ -277,8 +277,7 @@ sub _table_uniq_info { my $constraints = $self->_constraints_for($table, 'U'); - my @uniqs = map { [ $_ => $constraints->{$_} ] } keys %$constraints; - return \@uniqs; + return [ map { [ $_ => $constraints->{$_} ] } sort keys %$constraints ]; } sub _table_fk_info {