                       (conv-update (or (convs zid) {:rating-mat (named-matrix)}) votes)
                       (catch Exception e (println "exception when processing zid: " zid))))))
                 
-            ;(upsert-results pg-spec 1001 1 "foo")
             (println "zid: " zid)
             (println "time: " (System/currentTimeMillis))
             (println "\n\n")
             (println (generate-string (prep-for-uploading (@conversations zid))))
-            ; (debug-repl)
             (println 
               (mongo-upsert-results
                 zid






(defn -main []
  (let [poll-interval 1000
        pg-spec         (heroku-db-spec (env/env :database-url))
        mg-db           (mongo-connect! (env/env :mongo-url))

    }
    :multi false
    :upsert true))


(defn poll [db-spec last-timestamp]
