 ;;
 
 (def image-attributes
-  #{:w :h :id :url
-    :cam :delay :released :sol :taken-martian :taken-utc :thumbnail :type})
+  (set/union #{:w :h :id :url :cam :delay :sol :thumbnail :type} times/types))
 
 (defn classify-size
   [{:keys [w h type] :as image}]

(defmethod cell->map :camera
  [_ cell]
  (let [abbrev (-> (html/text cell) str/trim)]
    {:cam (cams/cams-by-abbrev abbrev)
     :cam-name (cams/cam-names-by-abbrev abbrev)}))

(defmethod cell->map :delay
  [_ cell]

(ns mars-ogler.scrape
  (:require [clojure.set :as set]
            [clojure.string :as str]
            [clj-time.core :as time]
            [clj-time.coerce :as cvt-time]
            [clj-time.format :as fmt-time]
