clean up some lint warnings

Signed-off-by: Sean Corfield <sean@corfield.org>
This commit is contained in:
Sean Corfield 2024-02-09 22:39:38 -08:00
parent 2149a80852
commit 2f4792253a
No known key found for this signature in database
2 changed files with 6 additions and 7 deletions

View file

@ -3,10 +3,9 @@
(ns honey.ops-test (ns honey.ops-test
(:refer-clojure :exclude [format]) (:refer-clojure :exclude [format])
(:require [clojure.test :refer [deftest is]] (:require [clojure.test :refer [deftest is]]
[honey.sql :as sut] [honey.sql :as sut]))
[honey.sql :as sql]))
(deftest issue-454 (deftest issue-454
(is (= ["SELECT a - b - c AS x"] (is (= ["SELECT a - b - c AS x"]
(-> {:select [[[:- :a :b :c] :x]]} (-> {:select [[[:- :a :b :c] :x]]}
(sql/format))))) (sut/format)))))

View file

@ -410,10 +410,10 @@
(deftest select-agg-order-by-test (deftest select-agg-order-by-test
(testing "single expression in order by" (testing "single expression in order by"
(is (= ["SELECT ARRAY_AGG(a ORDER BY x) FROM products"]) (is (= ["SELECT ARRAY_AGG(a ORDER BY x) FROM products"]
(sql/format (sql/format
{:select [[[:array_agg [:order-by :a :x]]]] {:select [[[:array_agg [:order-by :a :x]]]]
:from :products}))) :from :products}))))
(testing "multiple expressions in order by" (testing "multiple expressions in order by"
(is (= ["SELECT ARRAY_AGG(a ORDER BY x ASC, y DESC, z ASC) FROM products"] (is (= ["SELECT ARRAY_AGG(a ORDER BY x ASC, y DESC, z ASC) FROM products"]
(sql/format (sql/format