branch: elpa/emacsql
commit 641338533c73b33b466349f6a5be7fd3ce6838f6
Author: Christopher Wellons <well...@nullprogram.com>
Commit: Christopher Wellons <well...@nullprogram.com>
Just build SQLite on first connection.
---
emacsql-sqlite.el | 11 ++---------
1 file changed, 2 insertions(+), 9 deletions(-)
diff --git a/emacsql-sqlite.el b/emacsql-sqlite.el
index 40e484412e..97e71ebda8 100644
--- a/emacsql-sqlite.el
+++ b/emacsql-sqlite.el
@@ -237,18 +237,11 @@ This works like `url-copy-file' but actually checks for
errors."
(defun emacsql-sqlite-ensure-binary ()
"Ensure the EmacSQL SQLite binary is available, signaling an error if not."
(unless (file-exists-p emacsql-sqlite-executable)
- ;; try compiling again at the last minute
- (unless (ignore-errors (emacsql-sqlite-compile 0))
+ ;; try compiling at the last minute
+ (unless (ignore-errors (emacsql-sqlite-compile 2))
(unless (emacsql-sqlite-fetch-binary)
(error "No EmacSQL SQLite binary available, aborting")))))
-(let* ((bin-name (file-name-nondirectory emacsql-sqlite-executable))
- (emacsql-sqlite-executable
- (expand-file-name bin-name
- (expand-file-name "bin" emacsql-sqlite-data-root))))
- (unless (file-exists-p emacsql-sqlite-executable)
- (ignore-errors (emacsql-sqlite-compile 2))))
-
(provide 'emacsql-sqlite)
;;; emacsql-sqlite.el ends here
