luciano/specter
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

change dynamic navs to return single navigator instead of sequence of one nav, helps inline compiler when a nav takes a parameterized navs as input

Browse source
This commit is contained in:
nathanmarz 2017-03-22 13:30:35 -04:00
parent 468dcb05f9
commit fedef396eb
1 changed files with 9 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
src/clj/com/rpl/specter.cljc
View file

@ -32,8 +32,13 @@
(defn wrap-dynamic-nav [f] (defn wrap-dynamic-nav [f]
(fn [& args] (fn [& args]
(let [ret (apply f args)] (let [ret (apply f args)]
(if (and (sequential? ret) (static-path? ret)) (cond (and (sequential? ret) (static-path? ret))
(i/comp-paths* ret) (i/comp-paths* ret)
(and (sequential? ret) (= 1 (count ret)))
(first ret)
:else
ret ret
)))) ))))