Added simple test to check for preserved dashes when the var is bound to true.
This commit is contained in:
parent
1f6e9151fd
commit
7e78b10ae4
1 changed files with 5 additions and 0 deletions
|
|
@ -18,6 +18,11 @@
|
|||
:foo-bar "foo_bar")
|
||||
(is (= (quote-identifier "*" :style :ansi) "*")))
|
||||
|
||||
(deftest test-dashed-quote
|
||||
(binding [*allow-dashed-names?* true]
|
||||
(is (= (quote-identifier :foo-bar) "foo-bar"))
|
||||
(is (= (quote-identifier :foo-bar :style :ansi) "\"foo-bar\""))))
|
||||
|
||||
(deftest test-cte
|
||||
(is (= (format-clause
|
||||
(first {:with [[:query {:select [:foo] :from [:bar]}]]}) nil)
|
||||
|
|
|
|||
Loading…
Reference in a new issue