gered/clj-hl7-fhir
Archived
1
0
Fork 0
Code Issues 1 Pull requests Packages Projects Releases Wiki Activity

doesnt seem to be much need for this anymore

Browse source
This commit is contained in:
Gered 2014-07-04 19:10:12 -04:00
parent 455934cde5
commit 5845eda6b8
1 changed files with 1 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/clj_hl7_fhir/core.clj
View file

@ -5,13 +5,11 @@
(:use [camel-snake-kebab] (:use [camel-snake-kebab]
[clj-hl7-fhir.util])) [clj-hl7-fhir.util]))
(def ^:private base-params {:_format "json"})
(defn- ->fhir-resource-name [x] (defn- ->fhir-resource-name [x]
(name (->CamelCase x))) (name (->CamelCase x)))
(defn- fhir-get-request [base-url resource-url & [params]] (defn- fhir-get-request [base-url resource-url & [params]]
(let [query (map->query-string (merge base-params params))] (let [query (map->query-string params)]
(http-get-json (build-url base-url resource-url query)))) (http-get-json (build-url base-url resource-url query))))
(defn- ->search-param-name [parameter & [modifier]] (defn- ->search-param-name [parameter & [modifier]]