commit perl-DBD-SQLite for openSUSE:Factory

[Source-Sync]

Script 'mail_helper' called by obssrc
Hello community,

here is the log from the commit of package perl-DBD-SQLite for openSUSE:Factory 
checked in at 2021-08-02 12:04:30
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-DBD-SQLite (Old)
 and      /work/SRC/openSUSE:Factory/.perl-DBD-SQLite.new.1899 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-DBD-SQLite"

Mon Aug  2 12:04:30 2021 rev:46 rq:909336 version:1.68

Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-DBD-SQLite/perl-DBD-SQLite.changes  
2021-07-29 21:31:25.448810952 +0200
+++ 
/work/SRC/openSUSE:Factory/.perl-DBD-SQLite.new.1899/perl-DBD-SQLite.changes    
    2021-08-02 12:04:41.133660937 +0200
@@ -1,0 +2,6 @@
+Fri Jul 30 07:51:14 UTC 2021 - Tina M??ller <tina.muel...@suse.com>
+
+- Add patch silence_sqlite_unicode_deprecation_warning.patch
+   See https://github.com/DBD-SQLite/DBD-SQLite/issues/87
+
+-------------------------------------------------------------------

New:
----
  silence_sqlite_unicode_deprecation_warning.patch

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ perl-DBD-SQLite.spec ++++++
--- /var/tmp/diff_new_pack.p95XqQ/_old  2021-08-02 12:04:42.441660659 +0200
+++ /var/tmp/diff_new_pack.p95XqQ/_new  2021-08-02 12:04:42.441660659 +0200
@@ -25,6 +25,7 @@
 URL:            https://metacpan.org/release/%{cpan_name}
 Source0:        
https://cpan.metacpan.org/authors/id/I/IS/ISHIGAKI/%{cpan_name}-%{version}.tar.gz
 Source1:        cpanspec.yml
+Patch0:         silence_sqlite_unicode_deprecation_warning.patch
 BuildRequires:  perl
 BuildRequires:  perl-macros
 BuildRequires:  perl(DBI) >= 1.57
@@ -70,7 +71,7 @@
 the typeless nature of the SQLite database.
 
 %prep
-%autosetup  -n %{cpan_name}-%{version}
+%autosetup  -n %{cpan_name}-%{version} -p1
 
 %build
 perl Makefile.PL INSTALLDIRS=vendor OPTIMIZE="%{optflags}"

++++++ cpanspec.yml ++++++
--- /var/tmp/diff_new_pack.p95XqQ/_old  2021-08-02 12:04:42.481660651 +0200
+++ /var/tmp/diff_new_pack.p95XqQ/_new  2021-08-02 12:04:42.481660651 +0200
@@ -4,8 +4,8 @@
 #sources:
 #  - source1
 #  - source2
-#patches:
-#  foo.patch: -p1
+patches:
+  silence_sqlite_unicode_deprecation_warning.patch: -p1
 #  bar.patch:
 #preamble: |-
 # BuildRequires:  gcc-c++

++++++ silence_sqlite_unicode_deprecation_warning.patch ++++++
diff --git a/dbdimp.c b/dbdimp.c
index a8361ac..6dbff60 100644
--- a/dbdimp.c
+++ b/dbdimp.c
@@ -857,7 +857,10 @@ sqlite_db_STORE_attrib(SV *dbh, imp_dbh_t *imp_dbh, SV 
*keysv, SV *valuesv)
     }
 
     if (strEQ(key, "sqlite_unicode") || strEQ(key, "unicode")) {
-        _warn_deprecated_if_possible(key, "sqlite_string_mode");
+        if (strEQ(key, "unicode")) {
+            /* it's too early to warn the deprecation of sqlite_unicode as 
it's widely used */
+            _warn_deprecated_if_possible(key, "sqlite_string_mode");
+        }
 #if PERL_UNICODE_DOES_NOT_WORK_WELL
         sqlite_trace(dbh, imp_dbh, 3, form("Unicode support is disabled for 
this version of perl."));
         imp_dbh->string_mode = DBD_SQLITE_STRING_MODE_PV;