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

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

[nongnu] elpa/emacsql 9ee397b2be 413/427: Whitespace cosmetics


From: ELPA Syncer
Subject: [nongnu] elpa/emacsql 9ee397b2be 413/427: Whitespace cosmetics
Date: Tue, 13 Dec 2022 03:00:24 -0500 (EST)

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

    Whitespace cosmetics
---
 emacsql-compiler.el             |  3 ++-
 tests/emacsql-compiler-tests.el | 10 ++++++----
 2 files changed, 8 insertions(+), 5 deletions(-)

diff --git a/emacsql-compiler.el b/emacsql-compiler.el
index 927a8de330..415f0f4436 100644
--- a/emacsql-compiler.el
+++ b/emacsql-compiler.el
@@ -380,7 +380,8 @@ string returned is wrapped with parentheses."
       (cl-values (cond
                   ((null format-string) nil)
                   ((>= parent-precedence-value
-                       precedence-value) (format "(%s)" 
expanded-format-string))
+                       precedence-value)
+                   (format "(%s)" expanded-format-string))
                   (t expanded-format-string))
                  precedence-value))))
 
diff --git a/tests/emacsql-compiler-tests.el b/tests/emacsql-compiler-tests.el
index 8a2d540b02..9b69a11a0b 100644
--- a/tests/emacsql-compiler-tests.el
+++ b/tests/emacsql-compiler-tests.el
@@ -16,8 +16,8 @@
   (should-error (emacsql-escape-identifier 10))
   (should-error (emacsql-escape-identifier nil))
   (should (string= (emacsql-escape-identifier 'person-id) "person_id"))
-  (should (string= (emacsql-escape-identifier
-                    'people:person-id) "people.person_id"))
+  (should (string= (emacsql-escape-identifier 'people:person-id)
+                   "people.person_id"))
   (should (string= (emacsql-escape-identifier 'foo$) "foo$"))
   (should (string= (emacsql-escape-identifier 'foo:bar) "foo.bar")))
 
@@ -129,8 +129,10 @@
     ([:create-table foo ([a b] (:check (< a b)))] '()
      "CREATE TABLE foo (a &NONE, b &NONE, CHECK (a < b));")
     ([:create-table foo ([a b c]
-                         (:foreign-key [a b] :references bar [aa bb]
-                                       :on-delete :cascade))] '()
+                         ( :foreign-key [a b]
+                           :references bar [aa bb]
+                           :on-delete :cascade))]
+     '()
       (concat "CREATE TABLE foo (a &NONE, b &NONE, c &NONE, FOREIGN KEY (a, b) 
"
               "REFERENCES bar (aa, bb) ON DELETE CASCADE);"))
     ;; Template



reply via email to

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