 
 (defn invalid-parent-collection-for-validation
   [collection-validation-error]
-  (str "The collection given for validating the granule was invalid: " collection-validation-error))
+  (str "The collection given for validating the granule was invalid: "
+       (pr-str collection-validation-error)))
 
 (defn platform-not-matches-kms-keywords
   [platform]

(ns cmr.ingest.services.messages
  (:require [cmr.common.util :as util]
            [cmr.common.validations.core :as vc]
            [clojure.string :as str]))

(defn parent-collection-does-not-exist
  [provider-id granule-ur collection-ref]

                              attribute-order)]
    (case (count human-id-values)
      1 (first human-id-values)
      2 (string/join " and " human-id-values)
      ;; else
      (str (string/join ", " (drop-last human-id-values)) ", and " (last human-id-values)))))

(defn science-keyword-not-matches-kms-keywords
  "Create the invalid science keyword message"
