notid/integreat
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

undoing commit.

Browse Source
This commit is contained in:
Bryce Covert
2022-04-01 10:23:44 -07:00
parent e06861158e
commit 442e9799c7
6 changed files with 48 additions and 170 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
src/cljs/auto_ap/views/utils.cljs
View File

@@ -100,13 +100,6 @@
e
(date->str (time/from-default-time-zone (c/from-date e)) standard))))))
(defn dispatch-cljs-date-change [event]
(fn [e g]
(re-frame/dispatch (conj event
(if (str/blank? e)
e
(time/from-default-time-zone (c/from-date e)))))))
;; TODO inline on-changes causes each field to be rerendered each time. When we fix this
;; let's make sure that we find away not to trigger a re-render for every component any time any form field
;; changes
@@ -312,10 +305,10 @@
(let [field (if (keyword? field) [field] field)
event (if (keyword? event) [event] event)
selected (get-in subscription field)
selected (cond (string? selected)
(c/to-date (time/to-default-time-zone (time/from-default-time-zone (str->date selected standard))))
(instance? goog.date.DateTime selected)
(c/to-date (time/to-default-time-zone (time/from-default-time-zone selected)))
@@ -324,10 +317,9 @@
:else
selected )
keys (assoc keys
:on-change (when (:cljs-date? keys)
(dispatch-date-change (conj event field))
(dispatch-cljs-date-change (conj event field)))
:on-change (dispatch-date-change (conj event field))
:selected selected
:class (str class
(when (and spec (not (s/valid? spec (get-in subscription field))))
@@ -459,6 +451,8 @@
:next-month-label ""
:type "date")])
(defn local-now []
(t/to-default-time-zone (t/now)))