               src-xp  (-> queue first :src-xpath)
               src-nav-num (-> queue first :src-nav-num)
               body    (download-with-cookie url)
-             
+              
               ;; ask the rich extractor to sample and extract on this page.
               content    (try (rich-char-extractor/state-action
                                body url to-eliminate (clojure.set/union

                                                      (set [url])
                                                      (set (map :url queue))))
                              (catch Exception e nil))
              leaf?      (or (not body)
                             (rich-char-extractor/leaf?
                              (first src-nav-num) (cur-nav-fraction body content)))

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

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