branch: elpa/emacsql
commit 38bd19ed6fa61785503693f45b304572b00484f8
Author: Christopher Wellons <[email protected]>
Commit: Christopher Wellons <[email protected]>
Oops, use the right equality.
---
emacsql-sqlite.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/emacsql-sqlite.el b/emacsql-sqlite.el
index c3503f6b8b..2d30d43fea 100644
--- a/emacsql-sqlite.el
+++ b/emacsql-sqlite.el
@@ -117,7 +117,8 @@ If called with non-nil ASYNC the return value is
meaningless."
(with-current-buffer log
(let ((inhibit-read-only t))
(insert (mapconcat #'identity (cons cc arguments) " ") "\n")
- (= 0 (apply #'call-process cc nil (if async 0 t) t
arguments))))))))
+ (eql 0 (apply #'call-process cc nil (if async 0 t) t
+ arguments))))))))
(defvar emacsql-sqlite-user-prompted nil
"To avoid prompting for fetch multiple times.")
