aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEvgeniy Khramtsov <ekhramtsov@process-one.net>2015-04-08 14:39:47 +0300
committerEvgeniy Khramtsov <ekhramtsov@process-one.net>2015-04-08 14:39:47 +0300
commitbdedcf8d8a9efbc51b75e55e9ae65c5a3846c48f (patch)
tree42c58f26c8220c41e9180e3af3b0d019fc47e1d5
parentMake sure SQLite always returns binaries (diff)
Enable FOREIGN KEYS by default
-rw-r--r--src/ejabberd_odbc.erl1
-rw-r--r--src/ejabberd_odbc_sup.erl1
2 files changed, 2 insertions, 0 deletions
diff --git a/src/ejabberd_odbc.erl b/src/ejabberd_odbc.erl
index f8274f46f..7691d94e8 100644
--- a/src/ejabberd_odbc.erl
+++ b/src/ejabberd_odbc.erl
@@ -501,6 +501,7 @@ sqlite_connect(DB) ->
process_flag(trap_exit, true),
case sqlite3:open(?SQLITE_DB, [{file, binary_to_list(DB)}]) of
{ok, Ref} ->
+ sqlite3:sql_exec(?SQLITE_DB, "pragma foreign_keys = on"),
{ok, Ref};
{error, {already_started, Ref}} ->
{ok, Ref};
diff --git a/src/ejabberd_odbc_sup.erl b/src/ejabberd_odbc_sup.erl
index 95e8fa300..d278ef70d 100644
--- a/src/ejabberd_odbc_sup.erl
+++ b/src/ejabberd_odbc_sup.erl
@@ -143,6 +143,7 @@ check_sqlite_db(DB) ->
end,
case Ret of
ok ->
+ sqlite3:sql_exec(?SQLITE_DB, "pragma foreign_keys = on"),
case sqlite3:list_tables(?SQLITE_DB) of
[] ->
create_sqlite_tables(),