aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorEli Zaretskii2023-11-24 09:30:53 +0200
committerEli Zaretskii2023-11-24 09:30:53 +0200
commite6ad97a3338c22224eb0da3f0d3226be255298a7 (patch)
tree5a18eda531223f18b0aa35e7253af90a45332eff
parent1978b603bc3068140833e478a8103fea1d185aec (diff)
downloademacs-e6ad97a3338c22224eb0da3f0d3226be255298a7.tar.gz
emacs-e6ad97a3338c22224eb0da3f0d3226be255298a7.zip
Fix byte-compilation warnings about 'sqlite-rollback'
* lisp/sqlite.el (sqlite-transaction, sqlite-commit) (sqlite-rollback): Declare. * lisp/emacs-lisp/multisession.el (sqlite-commit) (sqlite-transaction): Remove declaration.
-rw-r--r--lisp/emacs-lisp/multisession.el2
-rw-r--r--lisp/sqlite.el4
2 files changed, 4 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/multisession.el b/lisp/emacs-lisp/multisession.el
index b09777be407..4f95fc91dd8 100644
--- a/lisp/emacs-lisp/multisession.el
+++ b/lisp/emacs-lisp/multisession.el
@@ -137,8 +137,6 @@ DOC should be a doc string, and ARGS are keywords as applicable to
137(declare-function sqlite-select "sqlite.c") 137(declare-function sqlite-select "sqlite.c")
138(declare-function sqlite-open "sqlite.c") 138(declare-function sqlite-open "sqlite.c")
139(declare-function sqlite-pragma "sqlite.c") 139(declare-function sqlite-pragma "sqlite.c")
140(declare-function sqlite-transaction "sqlite.c")
141(declare-function sqlite-commit "sqlite.c")
142 140
143(defvar multisession--db nil) 141(defvar multisession--db nil)
144 142
diff --git a/lisp/sqlite.el b/lisp/sqlite.el
index 8a525739c9a..22a0355d3cd 100644
--- a/lisp/sqlite.el
+++ b/lisp/sqlite.el
@@ -23,6 +23,10 @@
23 23
24;;; Code: 24;;; Code:
25 25
26(declare-function sqlite-transaction "sqlite.c")
27(declare-function sqlite-commit "sqlite.c")
28(declare-function sqlite-rollback "sqlite.c")
29
26(defmacro with-sqlite-transaction (db &rest body) 30(defmacro with-sqlite-transaction (db &rest body)
27 "Execute BODY while holding a transaction for DB. 31 "Execute BODY while holding a transaction for DB.
28If BODY completes normally, commit the changes and return 32If BODY completes normally, commit the changes and return