                                concat
                                (map
                                 (fn [{xpath :xpath
-                                     score :score
+                                     l-score :score
                                      hrefs :hrefs
                                      text  :texts}]
                                   ;; take only a 25 % sample from here.

              _          (println :src-score (try (double (first src-nav-num))
                                                  (catch Exception e nil)))
              _          (println :target-score (try
                                                  (double score)
                                                  (catch Exception e nil)))
              mined      (when-not leaf?
                           (rich-char-extractor/filter-content


(defn sample-sitemap
  ([start]
     (sample-sitemap start 10))   ; at least 10 threads please
  
  ([start limit]
     (let [start-body   (utils/download-with-cookie start)
           to-eliminate (template-removal/all-xpaths start-body start utils/my-cs)]
       (sample-sitemap [{:url start}] (set []) (set []) to-eliminate [] limit)))

  ([queue visited observed to-eliminate leaf-paths limit]
     (if (and
