reagent input with Chinese characters

cljs clj

;reagent input  two way binding with chinese characters .
；reagent 中文输入问题

(defn cjk-input [opts]
  (let [regex-compo-on? (atom false)
        on-change-fn (:on-change-fn opts)]
    [:input (merge  {:type "text"
                     :on-composition-start (fn [e]
                                             (reset! regex-compo-on? true))
                     :on-composition-end (fn [e]
                                           (reset! regex-compo-on? false))

                     :on-change (fn [e]                                        
                                  (let [val (-> e .-target .-value)]
                                    (when-not @regex-compo-on?
                                      (on-change-fn val))))}

                    (dissoc opts :on-change-fn))]))