   [provider entry-title begin end]
   (d/ingest provider
             (dc/collection {:entry-title entry-title
-                            :short-name (string/join [entry-title "_sn"])
                             :beginning-date-time (d/make-datetime begin)
                             :ending-date-time (d/make-datetime end)})))
 (defn delete-coll

(ns cmr.system-int-test.search.collection-sorting-search-test
  "Tests searching for collections using basic collection identifiers"
  (:require [clojure.test :refer :all]
            [clojure.string :as string]
            [cmr.system-int-test.utils.ingest-util :as ingest]
            [cmr.system-int-test.utils.search-util :as search]
            [cmr.system-int-test.utils.index-util :as index]

        ;; Revision ids are in reverse order by default
        (compare (:revision-id c2) (:revision-id c1))
        (compare (:concept-id c1) (:concept-id c2)))
      (let [processed-value1 (if (string? value1) (str/lower-case value1) value1)
            processed-value2 (if (string? value2) (str/lower-case value2) value2)]
        (if descending?
          (compare processed-value2 processed-value1)
          (compare processed-value1 processed-value2))))))
