2016-03-25 14:29:38 +03:00
|
|
|
(ns syng-im.components.chat
|
2016-03-25 13:36:16 +03:00
|
|
|
(:require [re-frame.core :refer [subscribe dispatch dispatch-sync]]
|
2016-03-25 14:29:38 +03:00
|
|
|
[syng-im.components.react :refer [view text image touchable-highlight navigator]]
|
|
|
|
|
[syng-im.utils.logging :as log]))
|
2016-03-25 13:36:16 +03:00
|
|
|
|
|
|
|
|
(def logo-img (js/require "./images/cljs.png"))
|
|
|
|
|
|
|
|
|
|
(defn alert [title]
|
|
|
|
|
(.alert (.-Alert js/React) title))
|
|
|
|
|
|
2016-03-25 14:29:38 +03:00
|
|
|
|
|
|
|
|
(defn chat [{:keys [navigator]}]
|
2016-03-25 13:36:16 +03:00
|
|
|
(let [greeting (subscribe [:get-greeting])]
|
|
|
|
|
(fn []
|
|
|
|
|
[view {:style {:flex-direction "column" :margin 40 :align-items "center"}}
|
|
|
|
|
[text {:style {:font-size 30 :font-weight "100" :margin-bottom 20 :text-align "center"}} @greeting]
|
|
|
|
|
[image {:source logo-img
|
|
|
|
|
:style {:width 80 :height 80 :margin-bottom 30}}]
|
|
|
|
|
[touchable-highlight {:style {:background-color "#999" :padding 10 :border-radius 5}
|
|
|
|
|
:on-press #(alert "HELLO!")}
|
|
|
|
|
[text {:style {:color "white" :text-align "center" :font-weight "bold"}} "press me"]]])))
|
