Fix issues to support running inside a higher version of om/clojurescript/sablono. 0.39

Author: guilespi

���project.clj

@@ -1,4 +1,4 @@
-(defproject org.clojars.intception/om-widgets "0.3.38"
+(defproject org.clojars.intception/om-widgets "0.3.39"
   :description "Widgets for OM/React"
   :url "https://github.com/orgs/intception/"
   :license {:name "Eclipse Public License"

src/om_widgets/datepicker.cljs

@@ -222,12 +222,11 @@
                        ;; next month
                                              (dom/th #js {:className "next"
                                                           :onClick (fn [e]
-                                                                     (om/set-state! owner :date (time/plus date (time/months 1))))} ">")
-
-                       ;; datepicker body
-                                             (apply dom/tr nil
-                                                    (om/build-all day-header days-short))
-                                             (om/build weeks-component app {:state {:path path :date date :onChange onChange}}))))))))
+                                                                     (om/set-state! owner :date (time/plus date (time/months 1))))} ">")))
+                          ;; datepicker body
+                          (apply dom/tr nil
+                                 (om/build-all day-header days-short))
+                          (om/build weeks-component app {:state {:path path :date date :onChange onChange}}))))))
 
 (defn datepicker
   "Datepicker public API

src/om_widgets/popover.cljs

@@ -53,7 +53,8 @@
 
 
 (defn app-root []
-  (sel1 "div [data-reactid]"))
+  (or (sel1 "div [data-reactid]")
+      (sel1 "div [data-reactroot]")))
 
 (defn popover-overlay
   [_ owner]

src/om_widgets/textinput.cljs

@@ -397,7 +397,7 @@
                                   nil)
                       :placeholder (:placeholder state)
                       :disabled (:disabled state)
-                      :typing-timeout (:typing-timeout state)
+                      ;:typing-timeout (:typing-timeout state)
                       :type (condp = (:input-format state)
                               "password" "password"
                               "numeric" "number"
@@ -430,4 +430,4 @@
                                            (cond (= input-format "numeric") "right"
                                                  (= input-format "integer") "right"
                                                  (= input-format "currency") "right"
-                                                 :else "left"))}))}))
+                                                 :else "left"))}))}))