r27107 - in /branches/upstream/libdbd-pg-perl/current: Changes META.yml Makefile.PL Pg.pm README SIGNATURE lib/Bundle/DBD/Pg.pm t/02attribs.t t/03dbmethod.t t/12placeholders.t t/dbdpg_test_setup.pl
gregoa at users.alioth.debian.org
gregoa at users.alioth.debian.org
Sat Nov 22 15:19:05 UTC 2008
Author: gregoa
Date: Sat Nov 22 15:19:02 2008
New Revision: 27107
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=27107
Log:
[svn-upgrade] Integrating new upstream version, libdbd-pg-perl (2.11.4)
Modified:
branches/upstream/libdbd-pg-perl/current/Changes
branches/upstream/libdbd-pg-perl/current/META.yml
branches/upstream/libdbd-pg-perl/current/Makefile.PL
branches/upstream/libdbd-pg-perl/current/Pg.pm
branches/upstream/libdbd-pg-perl/current/README
branches/upstream/libdbd-pg-perl/current/SIGNATURE
branches/upstream/libdbd-pg-perl/current/lib/Bundle/DBD/Pg.pm
branches/upstream/libdbd-pg-perl/current/t/02attribs.t
branches/upstream/libdbd-pg-perl/current/t/03dbmethod.t
branches/upstream/libdbd-pg-perl/current/t/12placeholders.t
branches/upstream/libdbd-pg-perl/current/t/dbdpg_test_setup.pl
Modified: branches/upstream/libdbd-pg-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdbd-pg-perl/current/Changes?rev=27107&op=diff
==============================================================================
--- branches/upstream/libdbd-pg-perl/current/Changes (original)
+++ branches/upstream/libdbd-pg-perl/current/Changes Sat Nov 22 15:19:02 2008
@@ -1,6 +1,11 @@
('GSM' is Greg Sabino Mullane, greg at turnstep.com)
-2.11.3 Released November 3, 2008
+2.11.4 Released November 12, 2008
+
+ - Don't set LC_MESSAGES unless superuser in tests. Remove all
+ language-specific string checking for tests. (CPAN bug #40604)
+
+2.11.3 Released November 3, 2008 (subversion r12031)
- Force LC_MESSAGES to 'C' inside tests (CPAN bug #40604)
- Minor compiler tweaks.
Modified: branches/upstream/libdbd-pg-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdbd-pg-perl/current/META.yml?rev=27107&op=diff
==============================================================================
--- branches/upstream/libdbd-pg-perl/current/META.yml (original)
+++ branches/upstream/libdbd-pg-perl/current/META.yml Sat Nov 22 15:19:02 2008
@@ -1,6 +1,6 @@
--- #YAML:1.0
name : DBD-Pg
-version : 2.11.3
+version : 2.11.4
abstract : DBI PostgreSQL interface
author:
- Greg Sabino Mullane <greg at turnstep.com>
@@ -39,10 +39,10 @@
provides:
DBD::Pg:
file : Pg.pm
- version : 2.11.3
+ version : 2.11.4
Bundle::DBD::Pg:
file : lib/Bundle/DBD/Pg.pm
- version : 2.11.3
+ version : 2.11.4
keywords:
- Postgres
Modified: branches/upstream/libdbd-pg-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdbd-pg-perl/current/Makefile.PL?rev=27107&op=diff
==============================================================================
--- branches/upstream/libdbd-pg-perl/current/Makefile.PL (original)
+++ branches/upstream/libdbd-pg-perl/current/Makefile.PL Sat Nov 22 15:19:02 2008
@@ -1,4 +1,4 @@
-# $Id: Makefile.PL 12030 2008-11-03 13:33:12Z turnstep $
+# $Id: Makefile.PL 12070 2008-11-12 20:43:07Z turnstep $
use ExtUtils::MakeMaker;
use Config;
@@ -7,7 +7,7 @@
use 5.006001;
## No version.pm for this one, as the prereqs are not loaded yet.
-my $VERSION = '2.11.3';
+my $VERSION = '2.11.4';
my $lib;
BEGIN {
Modified: branches/upstream/libdbd-pg-perl/current/Pg.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdbd-pg-perl/current/Pg.pm?rev=27107&op=diff
==============================================================================
--- branches/upstream/libdbd-pg-perl/current/Pg.pm (original)
+++ branches/upstream/libdbd-pg-perl/current/Pg.pm Sat Nov 22 15:19:02 2008
@@ -1,5 +1,5 @@
# -*-cperl-*-
-# $Id: Pg.pm 12030 2008-11-03 13:33:12Z turnstep $
+# $Id: Pg.pm 12070 2008-11-12 20:43:07Z turnstep $
#
# Copyright (c) 2002-2008 Greg Sabino Mullane and others: see the Changes file
# Portions Copyright (c) 2002 Jeffrey W. Baker
@@ -17,7 +17,7 @@
{
package DBD::Pg;
- use version; our $VERSION = qv('2.11.3');
+ use version; our $VERSION = qv('2.11.4');
use DBI ();
use DynaLoader ();
@@ -1703,7 +1703,7 @@
=head1 VERSION
-This documents version 2.11.3 of the DBD::Pg module
+This documents version 2.11.4 of the DBD::Pg module
=head1 DESCRIPTION
Modified: branches/upstream/libdbd-pg-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdbd-pg-perl/current/README?rev=27107&op=diff
==============================================================================
--- branches/upstream/libdbd-pg-perl/current/README (original)
+++ branches/upstream/libdbd-pg-perl/current/README Sat Nov 22 15:19:02 2008
@@ -1,12 +1,12 @@
DBD::Pg -- the DBI PostgreSQL interface for Perl
-# $Id: README 12030 2008-11-03 13:33:12Z turnstep $
+# $Id: README 12070 2008-11-12 20:43:07Z turnstep $
DESCRIPTION:
------------
-This is version 2.11.3 of DBD::Pg, the Perl interface to Postgres using DBI.
+This is version 2.11.4 of DBD::Pg, the Perl interface to Postgres using DBI.
The web site for this interface, and the latest version, can be found at:
http://search.cpan.org/dist/DBD-Pg/
@@ -78,9 +78,9 @@
control it yourself, define the environment variables POSTGRES_INCLUDE
and POSTGRES_LIB, or define just POSTGRES_HOME. Note that if you have
compiled PostgreSQL with SSL support, you must define the POSTGRES_LIB
-environment variable and add "-lssl" to it, like this:
-
- export POSTGRES_LIB="/usr/local/pgsql/lib -lssl"
+environment variable and add "-lssl" and "-lcrypto" to it, like this:
+
+ export POSTGRES_LIB="/usr/local/pgsql/lib -lssl -lcrypto"
The usual steps to install DBD::Pg:
Modified: branches/upstream/libdbd-pg-perl/current/SIGNATURE
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdbd-pg-perl/current/SIGNATURE?rev=27107&op=diff
==============================================================================
--- branches/upstream/libdbd-pg-perl/current/SIGNATURE (original)
+++ branches/upstream/libdbd-pg-perl/current/SIGNATURE Sat Nov 22 15:19:02 2008
@@ -15,44 +15,44 @@
Hash: RIPEMD160
SHA1 2f324889a0b126216bf45a04d74803557c4a404e .perlcriticrc
-SHA1 ee0bbfd00a3e1c66a4a0482dbbc6f5030b383d63 Changes
+SHA1 4da10a9506ddd19f871b8b0ce5d9dfa410835ca7 Changes
SHA1 4d91c71e5dbb19ece1505ab75c36d00a744bb076 MANIFEST
SHA1 22055b195f5cf15d7909e8a08468e617f46154e7 MANIFEST.SKIP
-SHA1 68a37e962a98d90d7780c1eb3622dc2c2294e026 META.yml
-SHA1 d9c6feb5381e5a7400f616803b7edfcdc579b1f5 Makefile.PL
+SHA1 ce3a1c4e4e2b67917bb0ecd90b0e8a3477e2df0f META.yml
+SHA1 e84299264b20171b6bdd00cd0d27ed69ce10feb2 Makefile.PL
SHA1 c51356c52c139265e20a2ad33bc8d3ee04f6ff48 Pg.h
-SHA1 0a1315194fbbc90ee4ac1ab4447fef98e5bc0746 Pg.pm
+SHA1 f1a49981510a4527faf90da296d6fae8f5762325 Pg.pm
SHA1 ff0fb11360e79db3c86e8b312cf58f62c5f19d2d Pg.xs
-SHA1 3945bbc82bb1c2880b4de77dda3542baf7685ae5 README
+SHA1 48cfd3d76c51994e42ae33aef954d84080feb114 README
SHA1 8f20ecd6822bce2a39504beb087bdd341ace06f4 README.dev
SHA1 968d5fad61bce160b31a9cb1a21dd240b9df930f README.win32
SHA1 cb3078ec98906fc6381ca0af9e146e2d8b4176c6 TODO
SHA1 e9f60c574ad9ff496e718c7a1aa7f4612bbae00b dbdimp.c
SHA1 cf577f22e9dc3c591daa32c51ebd83dd38f55a8f dbdimp.h
SHA1 6c33bcf138e577722283bef02fceb8cbce4d100d dbivport.h
-SHA1 ea07560a7f32ee85c0ed30fcfdd2ea620448ff1a lib/Bundle/DBD/Pg.pm
+SHA1 75fb36a2dbea14e1fd8a2cb13efd1d7be15323fc lib/Bundle/DBD/Pg.pm
SHA1 dbe8b0bd24538a61d4c617848e7fca27fd4ea3eb quote.c
SHA1 0a1fdd0406c5c367a9aba366d1d35cfa8d5272ae quote.h
SHA1 93aa7e8cae0a361d1e6163dea0281ebff41f3c5f t/00-signature.t
SHA1 073baf503a601ceeb49516d61bd275f0c1e51563 t/00basic.t
SHA1 f407ad828fe5898e1fa585523852b204ce9b5b2d t/01connect.t
SHA1 ec842e6aaf11d6a55809318d69bd11ce8245092f t/01constants.t
-SHA1 bb06303aa702844bb12861fa16e6255730e92c81 t/02attribs.t
-SHA1 790f36471738f6b701e86654f8cd0ffafce03f0b t/03dbmethod.t
+SHA1 bfa92ae26c5cbbf66144c014dd0f3c47da2a1246 t/02attribs.t
+SHA1 6ad4b49593cffb6da626764332fa2665a7f53d3f t/03dbmethod.t
SHA1 7ce47f4163e23b3f3df589487707257f5158001a t/03smethod.t
SHA1 910d6c2234d77a74a49cf189b6c799e13bf75280 t/04misc.t
SHA1 ee7ecab04b202d5cd8816fbb8c2703971161dd53 t/06bytea.t
SHA1 99aac4b46da5b138c42358854f8f9682b742c44d t/07copy.t
SHA1 1413c886eaf1714db1cf8abfb989dabfd86dee87 t/08async.t
SHA1 5027751944bdca8f0fe63c20c790c4c3beccf433 t/09arrays.t
-SHA1 8d79dee1b89a66024f07019d6e88246a5fd73983 t/12placeholders.t
+SHA1 a003cee9e26ab0ffd603b48acb7cd25d63ecdde6 t/12placeholders.t
SHA1 85b5df8ef0c78b1d2d0018d874c62af7ef01a28f t/20savepoints.t
SHA1 711a85cb938c6aa8a2b4200c0836a7caa397bf9f t/99_perlcritic.t
SHA1 3b22d5db94ca05d1fa1a8ea25d9c2ce866c36642 t/99_pod.t
SHA1 e2477a6e2fd50500e56a1835249655f7bc1a1e13 t/99_spellcheck.t
SHA1 ace40437561196dc6a08b5e725de35aed0e9902c t/99_yaml.t
SHA1 60031c2db489d77291078ab6a418723e1a35f137 t/99cleanup.t
-SHA1 ab4b4726844ec7a794bf6f683a055af50285b6c7 t/dbdpg_test_setup.pl
+SHA1 1cb6f145cdf9b3281e56724e858f4a13a86774c0 t/dbdpg_test_setup.pl
SHA1 bc4a58bdd5e853139f9e1fc6129f83e50a07a2c6 t/lib/App/Info.pm
SHA1 58befda00c12b1721875262505112203bf230450 t/lib/App/Info/Handler.pm
SHA1 b5bf85b12a5fc207c44113a9c028fb7fbd68531f t/lib/App/Info/Handler/Prompt.pm
@@ -65,7 +65,7 @@
SHA1 f07cd5ecaeb854c81ceb9206364979cf607e6546 win32.mak
-----BEGIN PGP SIGNATURE-----
-iEYEAREDAAYFAkkO/yoACgkQvJuQZxSWSsh6rgCgmgWx3Tq3yg61vng1UPy5d2Wf
-jYoAoJheI+9d4WGI/lu/nQj9J9JZPVO9
-=dywC
+iEYEAREDAAYFAkkbP+sACgkQvJuQZxSWSshhEgCdEmUFoC+4jnlj3MHXjwHY1ENk
+aTsAn2M61eYCxE+F7hLgcbuogCEOr7Go
+=h45J
-----END PGP SIGNATURE-----
Modified: branches/upstream/libdbd-pg-perl/current/lib/Bundle/DBD/Pg.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdbd-pg-perl/current/lib/Bundle/DBD/Pg.pm?rev=27107&op=diff
==============================================================================
--- branches/upstream/libdbd-pg-perl/current/lib/Bundle/DBD/Pg.pm (original)
+++ branches/upstream/libdbd-pg-perl/current/lib/Bundle/DBD/Pg.pm Sat Nov 22 15:19:02 2008
@@ -4,7 +4,7 @@
use strict;
use warnings;
-$VERSION = '2.11.3';
+$VERSION = '2.11.4';
1;
Modified: branches/upstream/libdbd-pg-perl/current/t/02attribs.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdbd-pg-perl/current/t/02attribs.t?rev=27107&op=diff
==============================================================================
--- branches/upstream/libdbd-pg-perl/current/t/02attribs.t (original)
+++ branches/upstream/libdbd-pg-perl/current/t/02attribs.t Sat Nov 22 15:19:02 2008
@@ -1480,12 +1480,12 @@
$t='Database handle attribute "ReadOnly" prevents INSERT queries from working when on';
$SQL = 'INSERT INTO dbd_pg_test (id) VALUES (50)';
eval { $dbh4->do($SQL); };
- like ($@, qr{transaction is read-only}, $t);
+ is($dbh4->state, '25006', $t);
$dbh4->rollback();
$sth = $dbh4->prepare($SQL);
eval { $sth->execute(); };
- like ($@, qr{transaction is read-only}, $t);
+ is($dbh4->state, '25006', $t);
$dbh4->rollback();
$t='Database handle attribute "ReadOnly" allows INSERT queries when switched off';
Modified: branches/upstream/libdbd-pg-perl/current/t/03dbmethod.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdbd-pg-perl/current/t/03dbmethod.t?rev=27107&op=diff
==============================================================================
--- branches/upstream/libdbd-pg-perl/current/t/03dbmethod.t (original)
+++ branches/upstream/libdbd-pg-perl/current/t/03dbmethod.t Sat Nov 22 15:19:02 2008
@@ -71,7 +71,7 @@
eval {
$dbh->last_insert_id(undef,undef,undef,undef,{sequence=>'dbd_pg_nonexistentsequence_test'});
};
-like ($@, qr{ERROR}, $t);
+is ($dbh->state, '42P01', $t);
$t='DB handle method "last_insert_id" fails when given a non-existent table';
$dbh->rollback();
Modified: branches/upstream/libdbd-pg-perl/current/t/12placeholders.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdbd-pg-perl/current/t/12placeholders.t?rev=27107&op=diff
==============================================================================
--- branches/upstream/libdbd-pg-perl/current/t/12placeholders.t (original)
+++ branches/upstream/libdbd-pg-perl/current/t/12placeholders.t Sat Nov 22 15:19:02 2008
@@ -157,7 +157,7 @@
eval {
$dbh->do(q{SELECT ??}, undef, 'public', 'error');
};
-like ($@, qr{ERROR}, $t);
+is($dbh->state, '42601', $t);
$t='Prepare/execute with non-DML placeholder works';
$dbh->commit();
Modified: branches/upstream/libdbd-pg-perl/current/t/dbdpg_test_setup.pl
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdbd-pg-perl/current/t/dbdpg_test_setup.pl?rev=27107&op=diff
==============================================================================
--- branches/upstream/libdbd-pg-perl/current/t/dbdpg_test_setup.pl (original)
+++ branches/upstream/libdbd-pg-perl/current/t/dbdpg_test_setup.pl Sat Nov 22 15:19:02 2008
@@ -239,6 +239,7 @@
}
## Make sure initdb exists and is working properly
+ $ENV{LANG} = 'C';
$info = '';
eval {
$info = qx{$initdb --help 2>&1};
@@ -450,7 +451,9 @@
$dbh = DBI->connect($testdsn, $testuser, '',
{RaiseError => 1, PrintError => 0, AutoCommit => 1});
};
- if ($@ =~ /starting up/ or $@ =~ /PGSQL\.$testport/) {
+ ## Regardless of the error, try again.
+ ## We used to check the message, but LANG problems may complicate that.
+ if ($@) {
if ($loop++ < 5) {
sleep 1;
redo STARTUP;
@@ -497,7 +500,11 @@
return $helpconnect, '', $dbh;
}
- $dbh->do(q{SET LC_MESSAGES = 'C'});
+ my $SQL = 'SELECT usesuper FROM pg_user WHERE usename = current_user';
+ my $bga = $dbh->selectall_arrayref($SQL)->[0][0];
+ if ($bga) {
+ $dbh->do(q{SET LC_MESSAGES = 'C'});
+ }
if ($arg->{nosetup}) {
return $helpconnect, '', $dbh unless schema_exists($dbh, $S);
More information about the Pkg-perl-cvs-commits
mailing list