[nongnu] elpa/emacsql ffd501a588 11/11: Newline cosmetics

[ELPA Syncer]

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

    Newline cosmetics
---
 emacsql-compiler.el | 13 +++++++------
 emacsql-psql.el     |  6 +++---
 2 files changed, 10 insertions(+), 9 deletions(-)

diff --git a/emacsql-compiler.el b/emacsql-compiler.el
index 1c645b64b4..8f9ddbd73d 100644
--- a/emacsql-compiler.el
+++ b/emacsql-compiler.el
@@ -275,8 +275,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
-                                             operator-precedence-groups)
+(defmacro emacsql--generate-op-lookup-defun (name operator-precedence-groups)
   "Generate function to look up predefined SQL operator metadata.
 
 The generated function is bound to NAME and accepts two
@@ -371,10 +370,12 @@ equal to the identified operator's precedence, then the 
format
 string returned is wrapped with parentheses."
   (cl-destructuring-bind (format-string arity precedence-value)
       (emacsql--get-op op argument-count)
-    (let ((expanded-format-string (emacsql--expand-format-string op
-                                                                 format-string
-                                                                 arity
-                                                                 
argument-count)))
+    (let ((expanded-format-string
+           (emacsql--expand-format-string
+            op
+            format-string
+            arity
+            argument-count)))
       (cl-values (cond
                   ((null format-string) nil)
                   ((>= parent-precedence-value
diff --git a/emacsql-psql.el b/emacsql-psql.el
index 37b23d879a..85e400dcc9 100644
--- a/emacsql-psql.el
+++ b/emacsql-psql.el
@@ -117,9 +117,9 @@ 
http://www.postgresql.org/docs/7.3/static/sql-keywords-appendix.html";)
 (cl-defmethod emacsql-waiting-p ((connection emacsql-psql-connection))
   (with-current-buffer (emacsql-buffer connection)
     (cond ((= (buffer-size) 1) (string= "]" (buffer-string)))
-          ((> (buffer-size) 1) (string= "\n]"
-                                        (buffer-substring
-                                         (- (point-max) 2) (point-max)))))))
+          ((> (buffer-size) 1) (string= "\n]" (buffer-substring
+                                               (- (point-max) 2)
+                                               (point-max)))))))
 
 (cl-defmethod emacsql-check-error ((connection emacsql-psql-connection))
   (with-current-buffer (emacsql-buffer connection)