             err-msg (str "Concept id fetch failed. MetadataDb app response status code: "  status)]
         (errors/internal-error! (str err-msg  " " errors-str))))))
 
-(deftracefn get-concept-revisions
+(defn get-concept-revisions
   "Search metadata db and return the concepts given by the concept-id, revision-id tuples."
   ([context concept-tuples]
    (get-concept-revisions context concept-tuples false))

        :not-found
        (str "Failed to retrieve concept " concept-id "/" revision-id " from metadata-db: " (:body response))))))

(deftracefn get-latest-concept
  "Retrieve the latest version of the concept"
  [context concept-id]
  (let [conn (config/context->app-connection context :metadata-db)

                                   " "
                                   response)))))

(defn delete-concept
  "Delete a concept from metatdata db."
  [context concept-id]
  (let [conn (config/context->app-connection context :metadata-db)
