        (merge-with concat acc {:bodies  (utils/random-take
                                          10
                                          stuff)
-                               :visited (utils/random-take
-                                         10
+                               :visited (map
+                                         :href
                                          hrefs-and-texts)})))
    {}
    xpaths-and-urls))

                                  new-bodies)
                          (clojure.set/union
                           (set visited)
                           (set [url]))
                          lookahead
                          leaf?
                          extract

                           :leaf-limit leaf-limit}

                  :model  (frequencies leaf-paths)
                  
                  :corpus corpus
                  
                  :prefix (uri/host (uri/uri url))})
               
               ;; leaf reached. what do bruh
               (leaf? {:anchor-text anchor-text
                       :src-url     src-url
