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

Move regex* location to a better spot.

Browse source 
...since it is no longer a "defrichnav."
This commit is contained in:
Michael Fogleman 2017-10-19 10:42:13 -04:00
parent 7dbe4dc524
commit d7ee2f7c6a
1 changed files with 7 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -478,6 +478,13 @@
structure structure
(updater structure next-fn)))) (updater structure next-fn))))
(defnav regex* [re]
(select* [this structure next-fn]
(doseqres NONE [s (re-seq re structure)]
(next-fn s)))
(transform* [this structure next-fn]
(clojure.string/replace structure re next-fn)))
(defn- update-first-list [l afn] (defn- update-first-list [l afn]
(let [newf (afn (first l)) (let [newf (afn (first l))
restl (rest l)] restl (rest l)]
@ -622,12 +629,6 @@
(do-keypath-transform vals structure key next-fn) (do-keypath-transform vals structure key next-fn)
)) ))
(defnav regex* [re]
(select* [this structure next-fn]
(doseqres NONE [s (re-seq re structure)]
(next-fn s)))
(transform* [this structure next-fn]
(clojure.string/replace structure re next-fn)))
(defrichnav (defrichnav
^{:doc "Navigates to the key only if it exists in the map. Setting the value to NONE ^{:doc "Navigates to the key only if it exists in the map. Setting the value to NONE