     updates              :updates
     in-host-xpaths-hrefs :in-host-xpaths-hrefs}]
   
-  (let [explorations-ds (exploration->exploration-ds explorations)
-
-        cluster-member? (fn [a-cluster x]
-                          (some
-                           (fn [a-member]
-                             (>= (page/signature-edit-distance-similarity
-                                  (-> a-member :r1)
-                                  (-> x :r1)
-                                  0.25
-                                  0.75)
-                                 *page-sim-thresh*))
-                           a-cluster))
-        
-        clusters        (reduce
-                         (fn [clusters x]
-                           (cluster/assign
-                            (into [] clusters) x cluster-member?))
-                         []
-                         explorations-ds)
-
-        self-cluster    (cluster/assign-where?
-                         clusters
-                         {:r1 signature
-                          :incoming-xpath nil
-                          :url url}
-                         cluster-member?)
+  (let [clusters        '*
+
+        self-cluster    '*
+
+        explorations-ds '*
 
         content-candids (map
                          #(nth clusters %)

        xpath-expls)))
    explorations)))

(defn cluster-explorations
  "Explorations are grouped into
clusters based on their similarities."
  [{url                  :src-link
    explorations         :explorations
    xpaths-hrefs         :xpaths-hrefs

            [crawler.rank :as rank]
            [crawler.records :as records]
            [crawler.utils :as utils]
            [org.bovinegenius [exploding-fish :as uri]])
  (:use [clojure.tools.logging :only (info error)]
        [clj-logging-config.log4j])
