emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

scratch/sqlite c494888: Fix typo in pragma (and always execute)


From: Lars Ingebrigtsen
Subject: scratch/sqlite c494888: Fix typo in pragma (and always execute)
Date: Tue, 14 Dec 2021 08:28:10 -0500 (EST)

branch: scratch/sqlite
commit c494888ae76c341f9518ed98099702d654c62d4b
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Fix typo in pragma (and always execute)
---
 lisp/emacs-lisp/multisession.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/lisp/emacs-lisp/multisession.el b/lisp/emacs-lisp/multisession.el
index a4c8f8b..815e87f 100644
--- a/lisp/emacs-lisp/multisession.el
+++ b/lisp/emacs-lisp/multisession.el
@@ -116,13 +116,13 @@ DOC should be a doc string, and ARGS are keywords as 
applicable to
         (make-directory dir t))
       (setq multisession--db (sqlite-open file)))
     (with-sqlite-transaction multisession--db
+      ;; Use a write-ahead-log (available since 2010), which makes
+      ;; writes a lot faster.
+      (sqlite-pragma multisession--db "journal_mode = WAL")
+      (sqlite-pragma multisession--db "synchronous = NORMAL")
       (unless (sqlite-select
                multisession--db
                "select name from sqlite_master where type = 'table' and name = 
'multisession'")
-        ;; Use a write-ahead-log (available since 2010), which makes
-        ;; writes a lot faster.
-        (sqlite-pragma multisession--db "journal_mode = WAL")
-        (sqlite-pragma multisession--db "bsynchronous = NORMAL")
         ;; Tidy up the database automatically.
         (sqlite-pragma multisession--db "auto_vacuum = FULL")
         ;; Create the table.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]