emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[nongnu] elpa/emacsql 66df2afbf1 091/427: Simplify start-process call.


From: ELPA Syncer
Subject: [nongnu] elpa/emacsql 66df2afbf1 091/427: Simplify start-process call.
Date: Tue, 13 Dec 2022 02:59:31 -0500 (EST)

branch: elpa/emacsql
commit 66df2afbf16203f387639c1ef5de763c0d29608e
Author: Christopher Wellons <wellons@nullprogram.com>
Commit: Christopher Wellons <wellons@nullprogram.com>

    Simplify start-process call.
---
 emacsql.el | 9 ++-------
 1 file changed, 2 insertions(+), 7 deletions(-)

diff --git a/emacsql.el b/emacsql.el
index 1b62b5c4b7..4722a628ca 100644
--- a/emacsql.el
+++ b/emacsql.el
@@ -70,9 +70,6 @@
 (defvar emacsql-sqlite3-executable "sqlite3"
   "Path to the sqlite3 executable.")
 
-(defvar emacsql-sqlite3-args '("-interactive")
-  "Additional arguments to pass to sqlite3.")
-
 (cl-defstruct (emacsql (:constructor emacsql--create))
   "A connection to a SQLite database."
   process file log)
@@ -103,10 +100,8 @@ buffer. This is for debugging purposes."
   (emacsql-start-reap-timer)
   (let* ((buffer (generate-new-buffer "*emacsql-connection*"))
          (fullfile (if file (expand-file-name file) ":memory:"))
-         (args emacsql-sqlite3-args)
-         (sqlite3 emacsql-sqlite3-executable)
-         (process (apply #'start-process "emacsql" buffer sqlite3
-                         (append args (list fullfile)))))
+         (process (start-process "emacsql" buffer emacsql-sqlite3-executable
+                                 "-interactive" fullfile)))
     (setf (process-sentinel process) (lambda (_proc _) (kill-buffer buffer)))
     (process-send-string process ".prompt #\n")
     (process-send-string process ".mode line\n")



reply via email to

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