 
 (s/defn observable->observable-hash :- s/Str
   [{:keys [type value] :as obsrvable :- Observable}]
-  (str (name type) ":" value))
+  (str type ":" value))
 
 (s/defn stored-sighting->es-stored-sighting :- (s/maybe ESStoredSighting)
   "adds an observables hash to a sighting"


(def handle-delete-sighting (crud/handle-delete :sighting StoredSighting))

(defn es-paginated-list->paginated-list [paginated-list]
  (update-in paginated-list
             [:data]
             #(map es-stored-sighting->stored-sighting (es-coerce! %))))

(ns ctia.stores.es.sighting
  (:require [ctia.lib.pagination :refer [list-response-schema]]
            [ctia.stores.es.crud :as crud]
            [ctim.schemas
             [common :refer [Observable]]
             [sighting :refer [StoredSighting]]]
