1
0
Fork 0
mirror of https://github.com/DBD-SQLite/DBD-SQLite synced 2025-06-07 14:19:10 -04:00

Silence the deprecation warning of sqlite_unicode as it's so widely used

This commit is contained in:
Kenichi Ishigaki 2021-07-30 06:05:13 +09:00
parent 0f476b9904
commit 6e7986e8d4

View file

@ -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")) { 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 #if PERL_UNICODE_DOES_NOT_WORK_WELL
sqlite_trace(dbh, imp_dbh, 3, form("Unicode support is disabled for this version of perl.")); 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; imp_dbh->string_mode = DBD_SQLITE_STRING_MODE_PV;