[nongnu] elpa/emacsql 44b4f89407 2/6: emacsql-sqlite-open: Enable foreign key constrains

[ELPA Syncer]

branch: elpa/emacsql
commit 44b4f89407ca12c24a8ce304f762c55b95775074
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    emacsql-sqlite-open: Enable foreign key constrains
---
 emacsql-sqlite.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/emacsql-sqlite.el b/emacsql-sqlite.el
index ece611bdf0..1b56d5c0eb 100644
--- a/emacsql-sqlite.el
+++ b/emacsql-sqlite.el
@@ -105,11 +105,12 @@ Automatically use the best available back-end, as 
returned by
 
 If FILE is nil, use an in-memory database.  If optional DEBUG is
 non-nil, log all SQLite commands to a log buffer, for debugging
-purposes."
+purposes.  Always enable support for foreign key constrains."
   (let* ((class (emacsql-sqlite-default-connection))
          (connection (make-instance class :file file)))
     (when debug
       (emacsql-enable-debugging connection))
+    (emacsql connection [:pragma (= foreign-keys on)])
     connection))
 
 (defun emacsql-sqlite-default-connection ()