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

                                      {:url h
                                       :src-xpath (cons xpath src-xp)
                                       :src-url url
                                       :src-nav-num (cons (if body l-score 0) src-nav-num)})
                                    hrefs)))
                                mined))))
                             :url)
                            (catch Exception e []))]
          (cond
           (and (not leaf?) (seq mined-links))
           (recur (concat (rest queue)

                                      :src-url url
                                      :src-nav-num (cons (if body l-score 0) src-nav-num)})
                                   hrefs))
                                observed))))
                            :url)
                           (catch Exception e []))              
              
