   'test' that is not an integration test namespace is considered a unit test namespace."
   (set/difference
     (->> (all-ns)
-         (filter #(re-find #"cmr\..*test" (str %)))
+         (map str)
+         (filter #(re-find #"cmr\..*test" %))
          set)
     (set integration-test-namespaces)))
 


(defn system-integration-test?
  [test-ns]
  (re-find #"system-int-test" (str test-ns)))

(defn integration-test-ns->compare-value
  "The comparator function to use for sorting integration tests. We want system integration tests

  "The list of integration test namespaces. Anything that contains 'cmr.' and 'int-test' is
  considered an integration test namespace."
  (->> (all-ns)
       (map str)
       (filter #(re-find #"cmr\..*int-test" %))
       (sort-by integration-test-ns->compare-value)))

(def unit-test-namespaces
