blob: 4e23d6318601272a822f46fb6e6c8b593ce20672 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
(ns io.cons.carddav_sync.authenticator_activity
(:use [neko.activity :only [defactivity set-content-view!]]
[neko.threading :only [on-ui]]
[neko.ui :only [make-ui]])
(:gen-class
:extends android.app.Activity
:exposes-methods {onCreate superOnCreate}))
(defn -onCreate
[this savedInstanceState]
(.superOnCreate this savedInstanceState)
(on-ui
(set-content-view! this
(make-ui [:linear-layout {}
[:text-view {:text "Hello from Clojure!"}]]))))
|
