This is an automated email from the git hooks/post-receive script. carnil pushed a commit to branch wheezy in repository libdbd-pg-perl.
commit e42b6333aeddada95b7398a0ed92efc2250b3e6e Author: Salvatore Bonaccorso <car...@debian.org> Date: Sat Apr 4 13:13:16 2015 +0200 Add 0001-Adjustments-for-the-loss-of-spclocation-in-9.2.patch patch Fixes interoperability problem between wheezy clients using DBD::Pg against newer PostgreSQL versions. Thanks: Christoph Biedl <debian.a...@manchmal.in-ulm.de> Closes: #781722 --- ...tments-for-the-loss-of-spclocation-in-9.2.patch | 37 ++++++++++++++++++++++ debian/patches/series | 1 + 2 files changed, 38 insertions(+) diff --git a/debian/patches/0001-Adjustments-for-the-loss-of-spclocation-in-9.2.patch b/debian/patches/0001-Adjustments-for-the-loss-of-spclocation-in-9.2.patch new file mode 100644 index 0000000..f7cdf4a --- /dev/null +++ b/debian/patches/0001-Adjustments-for-the-loss-of-spclocation-in-9.2.patch @@ -0,0 +1,37 @@ +From 00f3d68a79beb31a06460dd8f7cb73168c33ca5c Mon Sep 17 00:00:00 2001 +From: Greg Sabino Mullane <g...@endpoint.com> +Date: Thu, 31 May 2012 14:10:19 -0400 +Subject: [PATCH] Adjustments for the loss of spclocation in 9.2 + +--- + Pg.pm | 7 +++++++ + 1 file changed, 7 insertions(+) + +diff --git a/Pg.pm b/Pg.pm +index ef702d1..586d37f 100644 +--- a/Pg.pm ++++ b/Pg.pm +@@ -740,6 +740,10 @@ use 5.006001; + $whereclause + }; + ++ if ($dbh->{private_dbdpg}{version} >= 90200) { ++ $pri_key_sql =~ s/t.spclocation/pg_tablespace_location(t.oid)/; ++ } ++ + my $sth = $dbh->prepare($pri_key_sql) or return undef; + $sth->execute(); + my $info = $sth->fetchall_arrayref()->[0]; +@@ -1152,6 +1156,9 @@ use 5.006001; + $extracols = q{,n.nspname AS pg_schema, c.relname AS pg_table}; + my @search; + my $showtablespace = ', quote_ident(t.spcname) AS "pg_tablespace_name", quote_ident(t.spclocation) AS "pg_tablespace_location"'; ++ if ($dbh->{private_dbdpg}{version} >= 90200) { ++ $showtablespace = ', quote_ident(t.spcname) AS "pg_tablespace_name", quote_ident(pg_tablespace_location(t.oid)) AS "pg_tablespace_location"'; ++ } + + ## If the schema or table has an underscore or a %, use a LIKE comparison + if (defined $schema and length $schema) { +-- +2.1.4 + diff --git a/debian/patches/series b/debian/patches/series index d4b290f..a038562 100644 --- a/debian/patches/series +++ b/debian/patches/series @@ -1,2 +1,3 @@ pod-spelling.patch testdir.patch +0001-Adjustments-for-the-loss-of-spclocation-in-9.2.patch -- Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libdbd-pg-perl.git _______________________________________________ Pkg-perl-cvs-commits mailing list Pkg-perl-cvs-commits@lists.alioth.debian.org http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits