branch: elpa/emacsql
commit 3b24b5d17cb20c64cb91a26766ad1f4879ce9a5e
Author: Christopher Wellons <well...@nullprogram.com>
Commit: Christopher Wellons <well...@nullprogram.com>
Drop closed-p field.
---
emacsql.el | 7 ++-----
1 file changed, 2 insertions(+), 5 deletions(-)
diff --git a/emacsql.el b/emacsql.el
index 459ac9c128..4c72bfedcd 100644
--- a/emacsql.el
+++ b/emacsql.el
@@ -58,7 +58,7 @@
"Path to the sqlite3 executable.")
(cl-defstruct (emacsql (:constructor emacsql--create))
- process file closed-p)
+ process file)
(defvar emacsql-connections ()
"Collection of all known emacsql connections.
@@ -93,10 +93,7 @@ This collection exists for cleanup purposes.")
"Close connection to EMACSQL database."
(let ((process (emacsql-process emacsql)))
(when (and process (process-live-p process))
- (if (emacsql-closed-p emacsql)
- (kill-process process)
- (setf (emacsql-closed-p emacsql) t)
- (process-send-string process ".exit\n")))))
+ (process-send-string process ".exit\n"))))
(defun emacsql-buffer (emacsql)
"Get proccess buffer for EMACSQL."
