| (ns nested-routing.core | |
| (:require-macros [om.core :as om] | |
| [secretary.core :refer [defroute]]) | |
| (:require [om.dom :as dom] | |
| [om.core :as om] | |
| [secretary.core :as secretary] | |
| [goog.events :as events] | |
| [goog.history.EventType :as EventType]) | |
| (:import goog.History)) |
Recent improvements to the ClojureScript compiler have greatly simplified setting up development versus production outputs.
This example uses Figwheel as something that you want to exclude for production, but the pattern is general.
With this simple setup you only need one html file/view and it will work for developement and production.
| <!DOCTYPE html> | |
| <html> | |
| <head> | |
| <meta charset="utf-8" /> | |
| <meta name="format-detection" content="telephone=no" /> | |
| <meta name="msapplication-tap-highlight" content="no" /> | |
| <!-- WARNING: for iOS 7, remove the width=device-width and | |
| height=device-height attributes. See | |
| https://issues.apache.org/jira/browse/CB-4323 --> | |
| <meta name="viewport" |
| (comment ; Fun with transducers, v2 | |
| ;; Still haven't found a brief + approachable overview of Clojure 1.7's new | |
| ;; transducers in the particular way I would have preferred myself - so here goes: | |
| ;;;; Definitions | |
| ;; Looking at the `reduce` docstring, we can define a 'reducing-fn' as: | |
| (fn reducing-fn ([]) ([accumulation next-input])) -> new-accumulation | |
| ;; (The `[]` arity is actually optional; it's only used when calling | |
| ;; `reduce` w/o an init-accumulator). |
| (require '[clojure.core.async :as a]) | |
| (def xform (comp (map inc) | |
| (filter even?) | |
| (dedupe) | |
| (flatmap range) | |
| (partition-all 3) | |
| (partition-by #(< (apply + %) 7)) | |
| (flatmap flatten) | |
| (random-sample 1.0) |
| (defn graph [app owner opts] | |
| (reify | |
| om/IInitState | |
| (init-state [_] | |
| (let [data (:data app) | |
| width (:width opts) | |
| height (:height opts) | |
| x (-> d3 .-time (.scale) (.range [0 width])) | |
| y (-> d3 .-scale (.linear) (.range [height 0])) ] | |
| {:width width |
(by @andrestaltz)
If you prefer to watch video tutorials with live-coding, then check out this series I recorded with the same contents as in this article: Egghead.io - Introduction to Reactive Programming.
| Port = YOURPORT | |
| BaudRate = 115200 | |
| DataBits = 8 | |
| Parity = N | |
| StopBits = 1 | |
| FlowControlCTS = false | |
| FlowControlDTR = false | |
| FlowControlXON = false | |
| DTRDefaultState = true | |
| RTSDefaultState = true |
