emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/emacsql 9dca599616 383/427: Fix whitespace


From: ELPA Syncer
Subject: [nongnu] elpa/emacsql 9dca599616 383/427: Fix whitespace
Date: Tue, 13 Dec 2022 03:00:14 -0500 (EST)

branch: elpa/emacsql
commit 9dca5996168c4963eb67e61c7f17fdcb8228e314
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    Fix whitespace
---
 emacsql-compiler.el | 8 ++++----
 emacsql.el          | 2 +-
 2 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/emacsql-compiler.el b/emacsql-compiler.el
index 5345643b4a..55340e50f7 100644
--- a/emacsql-compiler.el
+++ b/emacsql-compiler.el
@@ -267,7 +267,7 @@ Only use within `emacsql-with-params'!"
       (vector (format "(%s)" (mapconcat #'scalar vector ", ")))
       (otherwise (emacsql-error "Invalid vector: %S" vector)))))
 
-(defmacro emacsql--generate-op-lookup-defun (name 
+(defmacro emacsql--generate-op-lookup-defun (name
                                              operator-precedence-groups)
   "Generate function to look up predefined SQL operator metadata.
 
@@ -300,7 +300,7 @@ See `emacsql--generate-op-lookup-defun' for details."
                      (pcase arity
                        (:unary `(,sql-name " " :operand))
                        (:binary `(:operand " " ,sql-name " " :operand))))
-                 
+
                  collect (list `(and (eq operator-name
                                          (quote ,op-name))
                                      ,(if (eq arity :unary)
@@ -479,8 +479,8 @@ Only use within `emacsql-with-params'!"
                             (concat "VALUES " (svector (pop items)))
                           (emacsql--from-keyword item)))
                (symbol (if (eq item '*)
-                            "*"
-                          (param item)))
+                           "*"
+                         (param item)))
                (vector (if (emacsql-sql-p item)
                            (subsql item)
                          (let ((idents (combine
diff --git a/emacsql.el b/emacsql.el
index c7ff14d5c1..e5745f44b3 100644
--- a/emacsql.el
+++ b/emacsql.el
@@ -404,7 +404,7 @@ A prefix argument causes the SQL to be printed into the 
current buffer."
   (if (save-excursion (beginning-of-line) (emacsql--inside-vector-p))
       (let ((lisp-indent-offset 1))
         ad-do-it)
-      ad-do-it))
+    ad-do-it))
 
 (defun emacsql-fix-vector-indentation ()
   "When called, advise `calculate-lisp-indent' to stop indenting vectors.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]