17 lines
771 B
Text
17 lines
771 B
Text
|
(ns camel-snake-kebab.extras-test
|
||
|
|
(:require [camel-snake-kebab.core :as csk]
|
||
|
|
[camel-snake-kebab.extras :refer [transform-keys]]
|
||
|
|
#?(:clj [clojure.test :refer :all]
|
||
|
|
:cljs [cljs.test :refer-macros [deftest testing is are]])))
|
||
|
|
|
||
|
|
(deftest transform-keys-test
|
||
|
|
(are [x y] (= x (transform-keys csk/->kebab-case-keyword y))
|
||
|
|
nil nil
|
||
|
|
{} {}
|
||
|
|
[] []
|
||
|
|
{:total-books 0 :all-books []} {'total_books 0 "allBooks" []}
|
||
|
|
[{:the-author "Dr. Seuss" :the-title "Green Eggs and Ham"}]
|
||
|
|
[{'the-Author "Dr. Seuss" "The_Title" "Green Eggs and Ham"}]
|
||
|
|
{:total-books 1 :all-books [{:the-author "Dr. Seuss" :the-title "Green Eggs and Ham"}]}
|
||
|
|
{'total_books 1 "allBooks" [{'THE_AUTHOR "Dr. Seuss" "the_Title" "Green Eggs and Ham"}]}))
|