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

remove dead code

Browse source
This commit is contained in:
nathanmarz 2017-03-14 12:21:18 -04:00
parent 3be05f2f0a
commit e32ec1c687
1 changed files with 0 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
src/clj/com/rpl/specter/navs.cljc
View file

@ -36,14 +36,6 @@
(walker structure) (walker structure)
(i/get-cell ret))) (i/get-cell ret)))
(defn key-select [akey structure next-fn]
(next-fn (get structure akey)))
(defn key-transform [akey structure next-fn]
(assoc structure akey (next-fn (get structure akey))))
(defn all-select [structure next-fn] (defn all-select [structure next-fn]
(doseqres i/NONE [e structure] (doseqres i/NONE [e structure]
(next-fn e))) (next-fn e)))