branch: elpa/emacsql
commit c92c56ce55c78008bd54830741d4c5913613bf6e
Author: Christopher Wellons <[email protected]>
Commit: Christopher Wellons <[email protected]>
Add a close buffer sentinel.
---
emacsql.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/emacsql.el b/emacsql.el
index 4c72bfedcd..04413bd6fb 100644
--- a/emacsql.el
+++ b/emacsql.el
@@ -80,8 +80,9 @@ This collection exists for cleanup purposes.")
(defun emacsql-connect (file)
"Open a connected to database stored in FILE."
(emacsql-start-reap-timer)
- (let* ((buffer (generate-new-buffer "emacsql-connection"))
+ (let* ((buffer (generate-new-buffer "*emacsql-connection*"))
(process (start-process "emacsql" buffer sqlite-program-name file)))
+ (setf (process-sentinel process) (lambda (_proc _) (kill-buffer buffer)))
(process-send-string process ".prompt #\n")
(process-send-string process ".mode line\n")
(let ((emacsql (emacsql--create :process process :file file)))
