X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FStorage%2FDBI%2FPg.pm;fp=lib%2FDBIx%2FClass%2FStorage%2FDBI%2FPg.pm;h=8dca06382059c2e4fc812b78c5e069dfadffa685;hb=2265a41b568ce018b0e38681ee9b161f1522347b;hp=5814b71c984e4b690aae9673b23211b274cb7dae;hpb=0194eb09a185c7356140c5e81cd855af41bac569;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/Storage/DBI/Pg.pm b/lib/DBIx/Class/Storage/DBI/Pg.pm index 5814b71..8dca063 100644 --- a/lib/DBIx/Class/Storage/DBI/Pg.pm +++ b/lib/DBIx/Class/Storage/DBI/Pg.pm @@ -199,6 +199,19 @@ sub _svp_rollback { $self->_get_dbh->pg_rollback_to($name); } +sub deployment_statements { + my $self = shift;; + my ($schema, $type, $version, $dir, $sqltargs, @rest) = @_; + + $sqltargs ||= {}; + + if (my $version = $self->_server_info->{normalized_dbms_version}) { + $sqltargs->{producer_args}{postgres_version} = $version; + } + + $self->next::method($schema, $type, $version, $dir, $sqltargs, @rest); +} + 1; __END__