[DBD::Pg 2/2] Add tests for version differences back in

[dbdpg-...@bucardo.org]

Committed by Greg Sabino Mullane <gr...@endpoint.com>

Subject: [DBD::Pg 2/2] Add tests for version differences back in

---
t/00_release.t | 8 ++++++--
1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/t/00_release.t b/t/00_release.t
index 3b70a92..0ae6ead 100644
--- a/t/00_release.t
+++ b/t/00_release.t
@@ -40,14 +40,18 @@ my $lastversion = '?';

for my $file (sort keys %filelist) {
my ($expected,$regexlist) = @{ $filelist{$file} };
- #diag "Want file $file to have $expected";

my $instances = 0;
open my $fh, '<', $file or die qq{Could not open "$file": $!\n};
SLURP: while (<$fh>) {
for my $regex (@{ $regexlist }) {
if ($_ =~ /$regex/) {
- push @{$v{$file}} => [$1, $.];
+ my $foundversion = $1;
+ push @{$v{$file}} => [$foundversion, $.];
+ if ($lastversion =~ /\d/ and $foundversion ne $lastversion) {
+ $goodversion = 0;
+ }
+ $lastversion = $foundversion;
$instances++;
last SLURP if $file eq 'Changes'; ## Only the top version please
}
--
1.8.4

[dbdpg-...@bucardo.org]

Committed by Greg Sabino Mullane <gr...@endpoint.com>

Subject: [DBD::Pg 1/2] Note need to get rid of 'adsrc' references

---
TODO | 1 +
1 file changed, 1 insertion(+)

diff --git a/TODO b/TODO
index 68db9c1..c541714 100644
--- a/TODO
+++ b/TODO
@@ -7,6 +7,7 @@ May also be some at
https://github.com/bucardo/dbdpg
(although we prefer using cpan.org)

+- Remove final reference to 'adsrc' column in Pg.pm
- Make all tests work when server and/or client encoding is SQL_ASCII
- Enable native JSON decoding, similar to arrays, perhaps with JSON::PP
- Allow partial result sets, either via PQsetSingleRowMode or something better
--
1.8.4