branch: elpa/emacsql
commit da2b137771347edb3bf94cc18c19413c88ec8a5e
Author: Christopher Wellons <[email protected]>
Commit: Christopher Wellons <[email protected]>
Fix the parameter naming in emacsql-show-last-sql.
---
emacsql.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/emacsql.el b/emacsql.el
index 297cf0bb25..13de4ce32f 100644
--- a/emacsql.el
+++ b/emacsql.el
@@ -349,8 +349,8 @@ Each column must be a plain symbol, no expressions allowed
here."
"Convert a s-expression SQL into a flat string for display."
(cl-destructuring-bind (string . vars) (emacsql-prepare sql)
(concat
- (apply #'format string (cl-loop for i from 1 to (length vars)
- collect (intern (format "$%d" i))))
+ (apply #'format string (cl-loop for i in (mapcar #'car vars)
+ collect (intern (format "$%d" (1+ i)))))
";")))
;;;###autoload
