specter

Latest version: 1.1.3
nathanmarz 2019-01-07T14:17:13.030400Z

@mfm you can do that like this:

(def CONTENT-WALKER
  (recursive-path [] p
    [ALL
     (if-path map?
       [:content p]
       STAY
       )]))

(into {}
  (select
    [ALL
     (collect-one :tag)
     :content
     (subselect CONTENT-WALKER)
     (if-path #(= 1 (count %)) FIRST STAY)
     ]
    data)
    )

zlrth 2019-01-07T14:17:41.030600Z

thank you!