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

naming adjustments

Browse source
This commit is contained in:
Gered 2014-07-08 10:07:36 -04:00
parent fd465f3466
commit 87ea877b26
2 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/clj_hl7_fhir/core.clj
View file

@ -56,7 +56,7 @@
(str (:namespace value) "|" (format-search-value (:value value))) (str (:namespace value) "|" (format-search-value (:value value)))
(instance? Date value) (instance? Date value)
(->iso-timestamp value) (->timestamp value)
:else :else
(-> value str escape-parameter))) (-> value str escape-parameter)))

6
src/clj_hl7_fhir/util.clj
View file

@ -17,19 +17,19 @@
(.setTimeZone df tz) (.setTimeZone df tz)
(.format df date)))) (.format df date))))
(defn ->iso-timestamp (defn ->timestamp
"returns an ISO8601 formatted date/time string for the given date object" "returns an ISO8601 formatted date/time string for the given date object"
[^Date date] [^Date date]
(format-date date iso8601-timestamp)) (format-date date iso8601-timestamp))
(defn ->iso-local-timestamp (defn ->local-timestamp
"returns an ISO8601 formatted date/time string for the given date object. the timestamp "returns an ISO8601 formatted date/time string for the given date object. the timestamp
will not include any timezone information and so is appropriate for local timezone will not include any timezone information and so is appropriate for local timezone
date/times only." date/times only."
[^Date date] [^Date date]
(format-date date iso8601-timestamp)) (format-date date iso8601-timestamp))
(defn ->iso-date (defn ->date
"returns an ISO8601 formatted date string for the given date object" "returns an ISO8601 formatted date string for the given date object"
[^Date date] [^Date date]
(format-date date iso8601-date)) (format-date date iso8601-date))