meissa/activity-pub-poc
6
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Added declare

Browse source
This commit is contained in:
Clemens 2023-08-02 11:01:07 +02:00
parent e44bdc2761
commit 1f076b9192
1 changed files with 3 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/main/cljc/org/domaindrivenarchitecture/activity_pub_poc/core.cljc
View file

@ -5,6 +5,8 @@
[org.domaindrivenarchitecture.activity-pub-poc.spec-helper :as sh] [org.domaindrivenarchitecture.activity-pub-poc.spec-helper :as sh]
[clojure.data.json :as json])) [clojure.data.json :as json]))
(declare normalize-functional-property)
(defn normalize-value [v] (defn normalize-value [v]
(cond (map? v) (cond (map? v)
(walk/walk normalize-functional-property identity v) (walk/walk normalize-functional-property identity v)
@ -12,6 +14,7 @@
(map normalize-value v) (map normalize-value v)
:else v)) :else v))
; TODO: Consider using tail recursion in case of prod usage
(defn normalize-functional-property [elem] (defn normalize-functional-property [elem]
(let [k (first elem) (let [k (first elem)
v (second elem)] v (second elem)]