reagent/demo/reagentdemo/core.cljs

46 lines
1.4 KiB
Plaintext
Raw Normal View History

(ns reagentdemo.core
(:require [reagent.core :as r]
[reagent.interop :as i :refer-macros [.' .!]]
2014-01-06 11:46:58 +00:00
[clojure.string :as string]
2015-09-07 20:22:26 +00:00
[sitetools.core :as tools :refer [dispatch link]]
2014-01-21 10:50:08 +00:00
[reagentdemo.common :as common :refer [demo-component]]
2014-01-18 10:31:43 +00:00
[reagentdemo.intro :as intro]
[reagentdemo.news :as news]
2014-01-17 10:12:11 +00:00
[reagent.debug :refer-macros [dbg println]]))
2014-01-02 13:04:30 +00:00
(def test-results (r/atom nil))
(def github {:href "https://github.com/reagent-project/reagent"})
2014-01-22 07:40:04 +00:00
2014-01-07 16:01:28 +00:00
(defn github-badge []
[:a.github-badge
2014-01-22 07:40:04 +00:00
github
2014-01-07 16:01:28 +00:00
[:img {:style {:position "absolute" :top 0 :left 0 :border 0}
2014-01-22 07:40:04 +00:00
:alt "Fork me on GitHub"
:src "https://s3.amazonaws.com/github/ribbons/forkme_left_orange_ff7600.png"}]])
2014-01-07 16:01:28 +00:00
2015-09-08 18:26:07 +00:00
(def index-page "/index.html")
2015-09-08 06:38:45 +00:00
(def title "Minimalistic React for ClojureScript")
2015-09-08 18:26:07 +00:00
(tools/register-page index-page [#'intro/main] title)
2015-09-07 20:22:26 +00:00
2014-01-02 13:04:30 +00:00
(defn demo []
[:div
2015-09-09 10:11:30 +00:00
[:div.nav>ul.nav
[:li.brand [link {:href index-page} "Reagent:"]]
[:li [link {:href index-page} "Intro"]]
[:li [link {:href news/url} "News"]]
[:li>a github "GitHub"]]
[:div @test-results]
[tools/main-content]
2014-01-09 13:37:11 +00:00
[github-badge]])
2014-01-05 10:16:01 +00:00
(defn init! []
(tools/start! {:body [#'demo]
2015-09-07 22:29:06 +00:00
:title-prefix "Reagent: "
:css-infiles ["site/public/css/examples.css"
"site/public/css/main.css"]}))
(init!)