branch: elpa/emacsql
commit b3aea1e6afb97aed84a591e23dd8c4d223759b78
Author: Christopher Wellons <[email protected]>
Commit: Christopher Wellons <[email protected]>
Oops, fix >= back.
---
emacsql.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/emacsql.el b/emacsql.el
index 23ba6c7f68..17ff1231b4 100644
--- a/emacsql.el
+++ b/emacsql.el
@@ -402,7 +402,9 @@ definitions for return from a `emacsql-defexpander'."
(cl-ecase (length args)
(2 (format "%s %s %s" (recur 0) op (recur 1)))
(3 (format "%s BETWEEN %s AND %s"
- (recur 1) (recur 0) (recur 2)))))
+ (recur 1)
+ (recur (if (eq op '>=) 2 0))
+ (recur (if (eq op '>=) 0 2))))))
((< > = != like glob is and or * / % << >> + - & |)
(if (= 2 (length args))
(format "%s %s %s"