You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
perl-DBD-SQLite/0001-Silence-the-deprecatio...

30 lines
1.0 KiB

From 6e7986e8d410cb25ded2ab958108170dc3835038 Mon Sep 17 00:00:00 2001
From: Kenichi Ishigaki <ishigaki@cpan.org>
Date: Fri, 30 Jul 2021 06:05:13 +0900
Subject: [PATCH] Silence the deprecation warning of sqlite_unicode as it's so
widely used
---
dbdimp.c | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
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;
--
2.32.0