[nongnu] elpa/emacsql da2b137771 289/427: Fix the parameter naming in emacsql-show-last-sql.

[ELPA Syncer]

branch: elpa/emacsql
commit da2b137771347edb3bf94cc18c19413c88ec8a5e
Author: Christopher Wellons <wellons@nullprogram.com>
Commit: Christopher Wellons <wellons@nullprogram.com>

    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