From 6e7986e8d410cb25ded2ab958108170dc3835038 Mon Sep 17 00:00:00 2001 From: Kenichi Ishigaki 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