cljs core skeleton
This commit is contained in:
parent
95baffdb9e
commit
dbf9289bf1
|
@ -0,0 +1,35 @@
|
||||||
|
;; Need to set js/React first so that Om can load
|
||||||
|
(set! js/React (js/require "react-native/Libraries/react-native/react-native.js"))
|
||||||
|
|
||||||
|
(ns $PROJECT_NAME_HYPHENATED$.core
|
||||||
|
(:require [om.core :as om]))
|
||||||
|
|
||||||
|
;; Reset js/React back as the form above loads in an different React
|
||||||
|
(set! js/React (js/require "react-native/Libraries/react-native/react-native.js"))
|
||||||
|
|
||||||
|
|
||||||
|
;; Setup some methods to help create React Native elements
|
||||||
|
|
||||||
|
(defn view [opts & children]
|
||||||
|
(apply js/React.createElement js/React.View (clj->js opts) children))
|
||||||
|
|
||||||
|
(defn text [opts & children]
|
||||||
|
(apply js/React.createElement js/React.Text (clj->js opts) children))
|
||||||
|
|
||||||
|
|
||||||
|
;; Set up our Om UI
|
||||||
|
|
||||||
|
(defonce app-state (atom {:text "Welcome to $PROJECT_NAME$"}))
|
||||||
|
|
||||||
|
(defn widget [data owner]
|
||||||
|
(reify
|
||||||
|
om/IRender
|
||||||
|
(render [this]
|
||||||
|
(view {:style {:flexDirection "row" :margin 40 :fontSize 20}}
|
||||||
|
(text nil (:text data))))))
|
||||||
|
|
||||||
|
(om/root widget app-state {:target 1})
|
||||||
|
|
||||||
|
(defn ^:export init []
|
||||||
|
((fn render []
|
||||||
|
(.requestAnimationFrame js/window render))))
|
Loading…
Reference in New Issue