[libdata-objectdriver-perl] 14/17: and the series file, finally

[gregor herrmann]

This is an automated email from the git hooks/post-receive script.

gregoa pushed a commit to branch master
in repository libdata-objectdriver-perl.

commit d437980aeb3d76b8346bcfd8c8fb84fee454d36a
Author: gregor herrmann <gregoa at debian.org>
Date:   Fri Jul 11 19:41:16 2014 +0200

    and the series file, finally
    
    Git-Dch: Ignore
---
 debian/patches/sqlite_unique.patch | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)

diff --git a/debian/patches/sqlite_unique.patch b/debian/patches/sqlite_unique.patch
new file mode 100644
index 0000000..2e179b0
--- /dev/null
+++ b/debian/patches/sqlite_unique.patch
@@ -0,0 +1,18 @@
+Description: adjust to newer SQLite
+Origin: CPAN RT
+Bug: https://rt.cpan.org/Public/Bug/Display.html?id=92870
+Author: zefram [...] fysh.org 
+Reviewed-by: gregor herrmann <gregoa at debian.org>
+Last-Update: 2014-07-11
+
+--- a/lib/Data/ObjectDriver/Driver/DBD/SQLite.pm
++++ b/lib/Data/ObjectDriver/Driver/DBD/SQLite.pm
+@@ -30,7 +30,7 @@
+ sub map_error_code {
+     my $dbd = shift;
+     my($code, $msg) = @_;
+-    if ($msg && $msg =~ /not unique/) {
++    if ($msg && $msg =~ /not unique|UNIQUE constraint failed/) {
+         return Data::ObjectDriver::Errors->UNIQUE_CONSTRAINT;
+     } else {
+         return;

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libdata-objectdriver-perl.git