              (println :url url)
              (println :decision decision)
              (println "PAGINATED")
-             {:links decision-links
-              :action-score decision-scores
-              :xpaths decision}))))))
+             {:decision decision-links
+              :score decision-scores}))))))
 
 (defn pagination?
   "Args:

          (do
            (println :url url)
            (println :decision decision)
            {:links decision-links
             :action-score decision-scores
             :xpaths (map first decision)}))
         
         (let [decision (-> url-ds :content-xpaths)
               decision-links (flatten
                               (map
                                (fn [a-decision]
                                  (map
                                   #(-> % :href)
                                   (in-host-xpaths-hrefs a-decision)))
                                decision))
               decision-scores (/ (reduce
                                   (fn [acc a-decision]

                                      (sort-by second xpaths-scored)))
               
                                        ; links at the chosen XPaths
               decision-links       (into
                                     {}
                                     (map
                                      (fn [[a-decision score]]
                                        [a-decision
                                         (map
                                          #(-> % :href)
                                          (in-host-xpaths-hrefs a-decision))])
                                      decision))
               
                                        ; this guy is computing the score products of the decisions alone
