        url
        (-> {}
            (request/add-token-header user-token)
-           (request/add-accept (format "%s; version=%s; %s"
-                                       "application/vnd.nasa.cmr.umm_results+json"
+           (request/add-accept (format accept-format
+                                       results-content-type
                                        pinned-variable-schema-version
-                                       "charset=utf-8"))
+                                       charset))
            (request/add-form-ct)
            (request/add-payload payload)
            ((fn [x] (log/trace "Full request:" x) x)))


;; XXX We can pull this from configuration once async-get-metadata function
;;     signatures get updated to accept the system data structure as an arg.
(def pinned-variable-schema-version "1.2")

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;   Notes   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

  variables, if params does not contain any."
  [search-endpoint user-token {variable-ids :variables}]
  (if (seq variable-ids)
    (let [url (str search-endpoint variables-api-path)
          payload (build-query variable-ids)]
      (log/debug "Variables query CMR URL:" url)
      (log/debug "Variables query CMR payload:" payload)
