File tree Expand file tree Collapse file tree 2 files changed +6
-4
lines changed
Expand file tree Collapse file tree 2 files changed +6
-4
lines changed Original file line number Diff line number Diff line change @@ -49,8 +49,9 @@ buffer. This is for debugging purposes."
4949 (and (oref connection handle) t ))
5050
5151(cl-defmethod emacsql-close ((connection emacsql-sqlite-builtin-connection))
52- (sqlite-close (oref connection handle))
53- (oset connection handle nil ))
52+ (when (oref connection handle)
53+ (sqlite-close (oref connection handle))
54+ (oset connection handle nil )))
5455
5556(cl-defmethod emacsql-send-message
5657 ((connection emacsql-sqlite-builtin-connection) message)
Original file line number Diff line number Diff line change @@ -55,8 +55,9 @@ buffer. This is for debugging purposes."
5555 (and (oref connection handle) t ))
5656
5757(cl-defmethod emacsql-close ((connection emacsql-sqlite-module-connection))
58- (sqlite3-close (oref connection handle))
59- (oset connection handle nil ))
58+ (when (oref connection handle)
59+ (sqlite3-close (oref connection handle))
60+ (oset connection handle nil )))
6061
6162(cl-defmethod emacsql-send-message
6263 ((connection emacsql-sqlite-module-connection) message)
You can’t perform that action at this time.
0 commit comments