21 lines
705 B
Plaintext
Raw Normal View History

(ns reagentdemo.news
(:require [reagentdemo.news.anyargs :as anyargs]
2014-01-30 22:29:42 +01:00
[reagentdemo.news.async :as async]
2014-02-22 12:36:34 +01:00
[reagentdemo.news.undodemo :as undodemo]
2014-12-10 12:02:47 +01:00
[reagentdemo.news.clockpost :as clock]
2015-09-08 08:38:45 +02:00
[reagentdemo.news.news050 :as news050]
[sitetools.core :as tools :refer [dispatch link]]
[secretary.core :as secretary :refer-macros [defroute]]))
2014-01-20 11:37:57 +01:00
(defn main []
2014-01-30 22:29:42 +01:00
[:div
2014-12-10 12:02:47 +01:00
[news050/main {:summary true}]
2014-02-22 12:36:34 +01:00
[clock/main {:summary true}]
2014-02-15 17:29:37 +01:00
[anyargs/main {:summary true}]
2014-02-03 10:20:05 +01:00
[async/main {:summary true}]
2014-02-22 08:21:21 +01:00
[undodemo/main {:summary true}]])
2015-09-08 08:38:45 +02:00
(defroute path "/news/index.html" []
2015-09-08 18:07:29 +02:00
(dispatch [:set-content [#'main] "News"]))
2015-09-08 08:38:45 +02:00
(tools/reg-page (path))