branch: elpa/emacsql
commit 47d9476a02c698184bef312ba876c3860b7d9589
Author: Christopher Wellons <[email protected]>
Commit: Christopher Wellons <[email protected]>
Add tests for quote operator.
---
emacsql-tests.el | 7 +++++++
1 file changed, 7 insertions(+)
diff --git a/emacsql-tests.el b/emacsql-tests.el
index 85a822fb62..18a36194ce 100644
--- a/emacsql-tests.el
+++ b/emacsql-tests.el
@@ -150,6 +150,13 @@
([:limit [$1 $2]] '(4 30)
"LIMIT 4, 30;")))
+(ert-deftest emacsql-expr ()
+ (emacsql-tests-with-queries
+ ([:where (= name 'foo)] '()
+ "WHERE name = 'foo';")
+ ([:where (= name '$1)] '(qux)
+ "WHERE name = 'qux';")))
+
(ert-deftest emacsql-system ()
"A short test that fully interacts with SQLite."
(should-not (emacsql-sqlite3-unavailable-p))
