From fa44df869d0ff87d41d844f8d0401bf6b0a069d7 Mon Sep 17 00:00:00 2001 From: harrybullough Date: Thu, 7 Oct 2021 16:56:18 +0100 Subject: [PATCH] Don't transform integer keys --- src/camel_snake_kebab/internals/macros.cljc | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/src/camel_snake_kebab/internals/macros.cljc b/src/camel_snake_kebab/internals/macros.cljc index 6a14f41..6894b18 100644 --- a/src/camel_snake_kebab/internals/macros.cljc +++ b/src/camel_snake_kebab/internals/macros.cljc @@ -22,7 +22,9 @@ (symbol)))] (for [[type-label type-converter] {"string" `identity "symbol" `symbol "keyword" `keyword}] `(defn ~(make-name type-label) [s# & rest#] - (~type-converter (apply convert-case ~first-fn ~rest-fn ~sep (name s#) rest#)))))) + (if (integer? s#) + s# + (~type-converter (apply convert-case ~first-fn ~rest-fn ~sep (name s#) rest#))))))) (defmacro defconversion [case-label first-fn rest-fn sep] `(do ~(type-preserving-function case-label first-fn rest-fn sep)