commit e2f93e8ae84889d5c6aeaee6656840bc791d7786
Author: Emmanuel Seyman <emmanuel@xxxxxxxxx>
Date: Sun Mar 23 00:31:27 2014 +0100
Add patch and bump EVR to rebuild
perl-Data-ObjectDriver-sqlite-return.patch | 12 ++++++++++++
perl-Data-ObjectDriver.spec | 5 ++++-
2 files changed, 16 insertions(+), 1 deletions(-)
---
diff --git a/perl-Data-ObjectDriver-sqlite-return.patch b/perl-Data-ObjectDriver-sqlite-return.patch
new file mode 100644
index 0000000..4a32f7b
--- /dev/null
+++ b/perl-Data-ObjectDriver-sqlite-return.patch
@@ -0,0 +1,12 @@
+diff -up ./lib/Data/ObjectDriver/Driver/DBD/SQLite.pm.orig ./lib/Data/ObjectDriver/Driver/DBD/SQLite.pm
+--- ./lib/Data/ObjectDriver/Driver/DBD/SQLite.pm.orig 2014-03-22 23:51:49.381272935 +0100
++++ ./lib/Data/ObjectDriver/Driver/DBD/SQLite.pm 2014-03-22 23:52:18.068098530 +0100
+@@ -30,7 +30,7 @@ sub bind_param_attributes {
+ 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;
diff --git a/perl-Data-ObjectDriver.spec b/perl-Data-ObjectDriver.spec
index 598aece..3be399e 100644
--- a/perl-Data-ObjectDriver.spec
+++ b/perl-Data-ObjectDriver.spec
@@ -1,6 +1,6 @@
Name: perl-Data-ObjectDriver
Version: 0.09
-Release: 10%{?dist}
+Release: 11%{?dist}
Summary: Simple, transparent data interface, with caching
License: GPL+ or Artistic
Group: Development/Libraries
@@ -54,6 +54,9 @@ make test
%{_mandir}/man3/*
%changelog
+* Sun Mar 23 2014 Emmanuel Seyman <emmanuel@xxxxxxxxx> - 0.09-11
+- Add patch and bump EVR to rebuild
+
* Sun Mar 23 2014 Emmanuel Seyman <emmanuel@xxxxxxxxx> - 0.09-10
- Patch Data-ObjectDriver to handle the new sqlite error return format
- Fix incorrect dates in changelog
--
Fedora Extras Perl SIG
http://www.fedoraproject.org/wiki/Extras/SIGs/Perl
perl-devel mailing list
perl-devel@xxxxxxxxxxxxxxxxxxxxxxx
https://admin.fedoraproject.org/mailman/listinfo/perl-devel
