Hello community,
here is the log from the commit of package perl-DBIx-Connector for
openSUSE:Factory checked in at 2016-04-22 16:23:08
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-DBIx-Connector (Old)
and /work/SRC/openSUSE:Factory/.perl-DBIx-Connector.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-DBIx-Connector"
Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-DBIx-Connector/perl-DBIx-Connector.changes
2016-02-25 22:48:52.000000000 +0100
+++
/work/SRC/openSUSE:Factory/.perl-DBIx-Connector.new/perl-DBIx-Connector.changes
2016-04-22 16:23:10.000000000 +0200
@@ -1,0 +2,13 @@
+Tue Mar 22 10:02:36 UTC 2016 - [email protected]
+
+- updated to 0.56
+ see /usr/share/doc/packages/perl-DBIx-Connector/Changes
+
+ 0.56 2016-03-16T17:07:05Z
+ - Added Firebird support, thanks to Stefan Suciu.
+ - Fixed SQLite savepoint support to properly detect SQlite versions 3.9
+ and higher.
+ - Restored MySQL savepoint testing when the DBICTEST_* environment
+ variables are set.
+
+-------------------------------------------------------------------
Old:
----
DBIx-Connector-0.55.tar.gz
New:
----
DBIx-Connector-0.56.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-DBIx-Connector.spec ++++++
--- /var/tmp/diff_new_pack.Fwva3J/_old 2016-04-22 16:23:11.000000000 +0200
+++ /var/tmp/diff_new_pack.Fwva3J/_new 2016-04-22 16:23:11.000000000 +0200
@@ -17,7 +17,7 @@
Name: perl-DBIx-Connector
-Version: 0.55
+Version: 0.56
Release: 0
%define cpan_name DBIx-Connector
Summary: Fast, safe DBI connection and transaction management
++++++ DBIx-Connector-0.55.tar.gz -> DBIx-Connector-0.56.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/DBIx-Connector-0.55/Changes
new/DBIx-Connector-0.56/Changes
--- old/DBIx-Connector-0.55/Changes 2016-02-05 19:58:48.000000000 +0100
+++ new/DBIx-Connector-0.56/Changes 2016-03-16 18:06:31.000000000 +0100
@@ -1,5 +1,12 @@
Revision history for Perl extension DBIx::Connector.
+0.56 2016-03-16T17:07:05Z
+ - Added Firebird support, thanks to Stefan Suciu.
+ - Fixed SQLite savepoint support to properly detect SQlite versions 3.9
+ and higher.
+ - Restored MySQL savepoint testing when the DBICTEST_* environment
+ variables are set.
+
0.55 2016-02-05T18:59:24Z
- Added versions to the RollbackError exception classes to make PAUSE
happy.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/DBIx-Connector-0.55/MANIFEST
new/DBIx-Connector-0.56/MANIFEST
--- old/DBIx-Connector-0.55/MANIFEST 2016-02-05 19:58:48.000000000 +0100
+++ new/DBIx-Connector-0.56/MANIFEST 2016-03-16 18:06:31.000000000 +0100
@@ -2,12 +2,15 @@
Changes
lib/DBIx/Connector.pm
lib/DBIx/Connector/Driver.pm
+lib/DBIx/Connector/Driver/Firebird.pm
lib/DBIx/Connector/Driver/MSSQL.pm
lib/DBIx/Connector/Driver/mysql.pm
lib/DBIx/Connector/Driver/Oracle.pm
lib/DBIx/Connector/Driver/Pg.pm
lib/DBIx/Connector/Driver/SQLite.pm
MANIFEST This list of files
+META.json
+META.yml
README.md
t/base.t
t/driver.t
@@ -22,5 +25,3 @@
t/txn.t
t/txn_fixup.t
t/txn_ping.t
-META.yml
-META.json
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/DBIx-Connector-0.55/META.json
new/DBIx-Connector-0.56/META.json
--- old/DBIx-Connector-0.55/META.json 2016-02-05 19:58:48.000000000 +0100
+++ new/DBIx-Connector-0.56/META.json 2016-03-16 18:06:31.000000000 +0100
@@ -39,43 +39,47 @@
"provides" : {
"DBIx::Connector" : {
"file" : "lib/DBIx/Connector.pm",
- "version" : "0.55"
+ "version" : "0.56"
},
"DBIx::Connector::Driver" : {
"file" : "lib/DBIx/Connector/Driver.pm",
- "version" : "0.55"
+ "version" : "0.56"
+ },
+ "DBIx::Connector::Driver::Firebird" : {
+ "file" : "lib/DBIx/Connector/Driver/Firebird.pm",
+ "version" : "0.56"
},
"DBIx::Connector::Driver::MSSQL" : {
"file" : "lib/DBIx/Connector/Driver/MSSQL.pm",
- "version" : "0.55"
+ "version" : "0.56"
},
"DBIx::Connector::Driver::Oracle" : {
"file" : "lib/DBIx/Connector/Driver/Oracle.pm",
- "version" : "0.55"
+ "version" : "0.56"
},
"DBIx::Connector::Driver::Pg" : {
"file" : "lib/DBIx/Connector/Driver/Pg.pm",
- "version" : "0.55"
+ "version" : "0.56"
},
"DBIx::Connector::Driver::SQLite" : {
"file" : "lib/DBIx/Connector/Driver/SQLite.pm",
- "version" : "0.55"
+ "version" : "0.56"
},
"DBIx::Connector::Driver::mysql" : {
"file" : "lib/DBIx/Connector/Driver/mysql.pm",
- "version" : "0.55"
+ "version" : "0.56"
},
"DBIx::Connector::RollbackError" : {
"file" : "lib/DBIx/Connector/Driver.pm",
- "version" : "0.55"
+ "version" : "0.56"
},
"DBIx::Connector::SvpRollbackError" : {
"file" : "lib/DBIx/Connector/Driver.pm",
- "version" : "0.55"
+ "version" : "0.56"
},
"DBIx::Connector::TxnRollbackError" : {
"file" : "lib/DBIx/Connector/Driver.pm",
- "version" : "0.55"
+ "version" : "0.56"
}
},
"release_status" : "stable",
@@ -91,5 +95,5 @@
"url" : "https://github.com/theory/dbix-connector";
}
},
- "version" : "0.55"
+ "version" : "0.56"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/DBIx-Connector-0.55/META.yml
new/DBIx-Connector-0.56/META.yml
--- old/DBIx-Connector-0.55/META.yml 2016-02-05 19:58:48.000000000 +0100
+++ new/DBIx-Connector-0.56/META.yml 2016-03-16 18:06:31.000000000 +0100
@@ -18,34 +18,37 @@
provides:
DBIx::Connector:
file: lib/DBIx/Connector.pm
- version: '0.55'
+ version: '0.56'
DBIx::Connector::Driver:
file: lib/DBIx/Connector/Driver.pm
- version: '0.55'
+ version: '0.56'
+ DBIx::Connector::Driver::Firebird:
+ file: lib/DBIx/Connector/Driver/Firebird.pm
+ version: '0.56'
DBIx::Connector::Driver::MSSQL:
file: lib/DBIx/Connector/Driver/MSSQL.pm
- version: '0.55'
+ version: '0.56'
DBIx::Connector::Driver::Oracle:
file: lib/DBIx/Connector/Driver/Oracle.pm
- version: '0.55'
+ version: '0.56'
DBIx::Connector::Driver::Pg:
file: lib/DBIx/Connector/Driver/Pg.pm
- version: '0.55'
+ version: '0.56'
DBIx::Connector::Driver::SQLite:
file: lib/DBIx/Connector/Driver/SQLite.pm
- version: '0.55'
+ version: '0.56'
DBIx::Connector::Driver::mysql:
file: lib/DBIx/Connector/Driver/mysql.pm
- version: '0.55'
+ version: '0.56'
DBIx::Connector::RollbackError:
file: lib/DBIx/Connector/Driver.pm
- version: '0.55'
+ version: '0.56'
DBIx::Connector::SvpRollbackError:
file: lib/DBIx/Connector/Driver.pm
- version: '0.55'
+ version: '0.56'
DBIx::Connector::TxnRollbackError:
file: lib/DBIx/Connector/Driver.pm
- version: '0.55'
+ version: '0.56'
recommends:
DBI: '1.614'
requires:
@@ -56,4 +59,4 @@
homepage: http://search.cpan.org/dist/DBIx-Connector/
license: http://dev.perl.org/licenses/
repository: https://github.com/theory/dbix-connector
-version: '0.55'
+version: '0.56'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/DBIx-Connector-0.55/README.md
new/DBIx-Connector-0.56/README.md
--- old/DBIx-Connector-0.55/README.md 2016-02-05 19:58:48.000000000 +0100
+++ new/DBIx-Connector-0.56/README.md 2016-03-16 18:06:31.000000000 +0100
@@ -1,4 +1,4 @@
-DBIx/Connection version 0.55
+DBIx/Connection version 0.56
============================
DBIx::Connector provides a simple interface for fast and safe DBI connection
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/DBIx-Connector-0.55/lib/DBIx/Connector/Driver/Firebird.pm
new/DBIx-Connector-0.56/lib/DBIx/Connector/Driver/Firebird.pm
--- old/DBIx-Connector-0.55/lib/DBIx/Connector/Driver/Firebird.pm
1970-01-01 01:00:00.000000000 +0100
+++ new/DBIx-Connector-0.56/lib/DBIx/Connector/Driver/Firebird.pm
2016-03-16 18:06:31.000000000 +0100
@@ -0,0 +1,75 @@
+package DBIx::Connector::Driver::Firebird;
+
+use strict;
+use warnings;
+use base 'DBIx::Connector::Driver';
+our $VERSION = '0.56';
+
+sub savepoint {
+ my ($self, $dbh, $name) = @_;
+ $dbh->do("SAVEPOINT $name");
+}
+
+# Firebird automatically erases a savepoint when you create another
+# one with the same name.
+sub release { 1 }
+
+sub rollback_to {
+ my ($self, $dbh, $name) = @_;
+ $dbh->do("ROLLBACK TO $name");
+}
+
+1;
+
+__END__
+
+=head1 Name
+
+DBIx::Connector::Driver::Firebird - Firebird-specific connection
+interface
+
+=head1 Description
+
+This subclass of L<DBIx::Connector::Driver|DBIx::Connector::Driver>
+provides Firebird-specific implementations of the following methods:
+
+=over
+
+=item C<savepoint>
+
+=item C<release>
+
+=item C<rollback_to>
+
+=back
+
+=head1 Authors
+
+This module was written and is maintained by:
+
+=over
+
+=item David E. Wheeler <[email protected]>
+
+=item Stefan Suciu <[email protected]>
+
+=back
+
+It is based on code written by:
+
+=over
+
+=item Matt S. Trout <[email protected]>
+
+=item Peter Rabbitson <[email protected]>
+
+=back
+
+=head1 Copyright and License
+
+Copyright (c) 2009-2016 David E. Wheeler. Some Rights Reserved.
+
+This module is free software; you can redistribute it and/or modify it under
+the same terms as Perl itself.
+
+=cut
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/DBIx-Connector-0.55/lib/DBIx/Connector/Driver/MSSQL.pm
new/DBIx-Connector-0.56/lib/DBIx/Connector/Driver/MSSQL.pm
--- old/DBIx-Connector-0.55/lib/DBIx/Connector/Driver/MSSQL.pm 2016-02-05
19:58:48.000000000 +0100
+++ new/DBIx-Connector-0.56/lib/DBIx/Connector/Driver/MSSQL.pm 2016-03-16
18:06:31.000000000 +0100
@@ -3,7 +3,7 @@
use strict;
use warnings;
use base 'DBIx::Connector::Driver';
-our $VERSION = '0.55';
+our $VERSION = '0.56';
sub savepoint {
my ($self, $dbh, $name) = @_;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/DBIx-Connector-0.55/lib/DBIx/Connector/Driver/Oracle.pm
new/DBIx-Connector-0.56/lib/DBIx/Connector/Driver/Oracle.pm
--- old/DBIx-Connector-0.55/lib/DBIx/Connector/Driver/Oracle.pm 2016-02-05
19:58:48.000000000 +0100
+++ new/DBIx-Connector-0.56/lib/DBIx/Connector/Driver/Oracle.pm 2016-03-16
18:06:31.000000000 +0100
@@ -3,7 +3,7 @@
use strict;
use warnings;
use base 'DBIx::Connector::Driver';
-our $VERSION = '0.55';
+our $VERSION = '0.56';
# Note from https://rt.cpan.org/Ticket/Display.html?id=47005:
# DBD::Oracle has some shutdown state in which it will return 1 on ping as
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/DBIx-Connector-0.55/lib/DBIx/Connector/Driver/Pg.pm
new/DBIx-Connector-0.56/lib/DBIx/Connector/Driver/Pg.pm
--- old/DBIx-Connector-0.55/lib/DBIx/Connector/Driver/Pg.pm 2016-02-05
19:58:48.000000000 +0100
+++ new/DBIx-Connector-0.56/lib/DBIx/Connector/Driver/Pg.pm 2016-03-16
18:06:31.000000000 +0100
@@ -3,7 +3,7 @@
use strict;
use warnings;
use base 'DBIx::Connector::Driver';
-our $VERSION = '0.55';
+our $VERSION = '0.56';
sub savepoint {
my ($self, $dbh, $name) = @_;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/DBIx-Connector-0.55/lib/DBIx/Connector/Driver/SQLite.pm
new/DBIx-Connector-0.56/lib/DBIx/Connector/Driver/SQLite.pm
--- old/DBIx-Connector-0.55/lib/DBIx/Connector/Driver/SQLite.pm 2016-02-05
19:58:48.000000000 +0100
+++ new/DBIx-Connector-0.56/lib/DBIx/Connector/Driver/SQLite.pm 2016-03-16
18:06:31.000000000 +0100
@@ -3,13 +3,19 @@
use strict;
use warnings;
use base 'DBIx::Connector::Driver';
-our $VERSION = '0.55';
+our $VERSION = '0.56';
sub _connect {
my ($self, $dbh, $dsn, $username, $password, $attrs) = @_;
my ($x, $y, $z) = split /[.]/ => $dbh->{sqlite_version};
- $self->{_sqlite_is_new_enough} = ($x >= 3 && $y >= 6 && $z >= 8) ? 1 : 0;
+ $self->{_sqlite_is_new_enough} = (
+ $x > 3 || (
+ $x == 3 && ($y > 6 || (
+ $y == 6 && $z >= 8
+ ))
+ )
+ ) ? 1 : 0;
return $dbh;
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/DBIx-Connector-0.55/lib/DBIx/Connector/Driver/mysql.pm
new/DBIx-Connector-0.56/lib/DBIx/Connector/Driver/mysql.pm
--- old/DBIx-Connector-0.55/lib/DBIx/Connector/Driver/mysql.pm 2016-02-05
19:58:48.000000000 +0100
+++ new/DBIx-Connector-0.56/lib/DBIx/Connector/Driver/mysql.pm 2016-03-16
18:06:31.000000000 +0100
@@ -3,7 +3,7 @@
use strict;
use warnings;
use base 'DBIx::Connector::Driver';
-our $VERSION = '0.55';
+our $VERSION = '0.56';
sub _connect {
my ($self, $dbh) = @_;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/DBIx-Connector-0.55/lib/DBIx/Connector/Driver.pm
new/DBIx-Connector-0.56/lib/DBIx/Connector/Driver.pm
--- old/DBIx-Connector-0.55/lib/DBIx/Connector/Driver.pm 2016-02-05
19:58:48.000000000 +0100
+++ new/DBIx-Connector-0.56/lib/DBIx/Connector/Driver.pm 2016-03-16
18:06:31.000000000 +0100
@@ -2,7 +2,7 @@
use strict;
use warnings;
-our $VERSION = '0.55';
+our $VERSION = '0.56';
DRIVERS: {
my %DRIVERS;
@@ -80,7 +80,7 @@
ROLLBACKERR: {
package DBIx::Connector::RollbackError;
- our $VERSION = '0.55';
+ our $VERSION = '0.56';
# an exception is always true
use overload bool => sub {1}, '""' => 'as_string', fallback => 1;
@@ -95,12 +95,12 @@
}
package DBIx::Connector::TxnRollbackError;
- our $VERSION = '0.55';
+ our $VERSION = '0.56';
our @ISA = ('DBIx::Connector::RollbackError');
sub _label { 'Transaction' }
package DBIx::Connector::SvpRollbackError;
- our $VERSION = '0.55';
+ our $VERSION = '0.56';
our @ISA = ('DBIx::Connector::RollbackError');
sub _label { 'Savepoint' }
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/DBIx-Connector-0.55/lib/DBIx/Connector.pm
new/DBIx-Connector-0.56/lib/DBIx/Connector.pm
--- old/DBIx-Connector-0.55/lib/DBIx/Connector.pm 2016-02-05
19:58:48.000000000 +0100
+++ new/DBIx-Connector-0.56/lib/DBIx/Connector.pm 2016-03-16
18:06:31.000000000 +0100
@@ -6,7 +6,7 @@
use DBI '1.605';
use DBIx::Connector::Driver;
-our $VERSION = '0.55';
+our $VERSION = '0.56';
sub new {
my $class = shift;
@@ -653,6 +653,8 @@
=item L<DBIx::Connector::Driver::mysql>
+=item L<DBIx::Connector::Driver::Firebird>
+
=back
=head2 Class Method
@@ -823,6 +825,8 @@
=item * Microsoft SQL Server
+=item * Firebird 1.5
+
=back
For all other RDBMSs, C<svp()> works just like C<txn()>: savepoints will be
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/DBIx-Connector-0.55/t/driver.t
new/DBIx-Connector-0.56/t/driver.t
--- old/DBIx-Connector-0.55/t/driver.t 2016-02-05 19:58:48.000000000 +0100
+++ new/DBIx-Connector-0.56/t/driver.t 2016-03-16 18:06:31.000000000 +0100
@@ -2,7 +2,7 @@
use strict;
use warnings;
-use Test::More tests => 31;
+use Test::More tests => 34;
#use Test::More 'no_plan';
my $CLASS;
@@ -11,7 +11,7 @@
$CLASS = 'DBIx::Connector::Driver';
use_ok $CLASS or die;
use_ok 'DBIx::Connector' or die;
- @SUBCLASSES = map { "$CLASS\::$_" } qw(MSSQL Oracle Pg SQLite mysql);
+ @SUBCLASSES = map { "$CLASS\::$_" } qw(MSSQL Oracle Pg SQLite mysql
Firebird);
use_ok $_ for @SUBCLASSES;
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/DBIx-Connector-0.55/t/svp_live.t
new/DBIx-Connector-0.56/t/svp_live.t
--- old/DBIx-Connector-0.55/t/svp_live.t 2016-02-05 19:58:48.000000000
+0100
+++ new/DBIx-Connector-0.56/t/svp_live.t 2016-03-16 18:06:31.000000000
+0100
@@ -24,13 +24,17 @@
id INTEGER NOT NULL PRIMARY KEY AUTOINCREMENT, name TEXT
)},
);
- # } elsif ($driver eq 'mysql') {
- # @table_sql = (q{
- # DROP TABLE IF EXISTS artist;
- # CREATE TABLE artist (
- # id INTEGER NOT NULL AUTO_INCREMENT PRIMARY KEY, name TEXT
- # ) ENGINE=InnoDB;
- # });
+ } elsif ($driver eq 'Firebird') {
+ @table_sql = (
+ q{RECREATE TABLE artist (id INTEGER, name VARCHAR(100))},
+ );
+ } elsif ($driver eq 'mysql') {
+ @table_sql = (
+ 'DROP TABLE IF EXISTS artist;',
+ q{CREATE TABLE artist (
+ id INTEGER NOT NULL AUTO_INCREMENT PRIMARY KEY, name TEXT
+ ) ENGINE=InnoDB;
+ });
} else {
plan skip_all => 'Set DBICTEST_DSN _USER and _PASS to run savepoint
tests';
}
@@ -44,12 +48,13 @@
PrintError => 0,
RaiseError => 1,
}), 'Get a connection';
+diag "Connecting to $dsn";
ok my $dbh = $conn->dbh, 'Get the database handle';
isa_ok $dbh, 'DBI::db', 'The handle';
$dbh->do($_) for (
@table_sql,
- "INSERT INTO artist (name) VALUES('foo')",
+ "INSERT INTO artist (id, name) VALUES(1, 'foo')",
);
pass 'Table created';
