   [resource]
   (dissoc resource :parameters))
 
-(pls/defn-validated add-resources!
+(s/defn add-resources!
   "Persist the given resource and associate it with the given catalog."
   [certname-id :- Long
    refs-to-resources :- resource-ref->resource-schema

                       (assoc (catalog-row-map hash catalog received-timestamp)
                              :certname certname))))

(pls/defn-validated resources-exist? :- #{String}
  "Given a collection of resource-hashes, return the subset that
   already exist in the database."
  [resource-hashes :- #{String}]

         (update-catalog-metadata! catalog-id hash catalog received-timestamp)
         (update-catalog-associations! certname-id catalog refs-to-hashes)))

(s/defn add-new-catalog
  "Creates new catalog metadata and adds the proper associations for the edges and resources"
  [certname-id :- Long
   hash :- String
