facundoolano

Make a Clojure project also run in ClojureScript

Full story here.

Getting started

1. Differences from Clojure
2. :require-macros
3. ClojureScript Quick Start
4. Using ClojureScript on a Web Page

facundoolano

-module(server).

-export([start/0]).
-export([become/1]).
-export([shutdown/0]).
-export([request/1]).
-export([ping/1]).
-export([factorial/1]).
-export([sum/1]).

facundoolano

facundoolano

WebRTC

WebRTC is a free, open project that provides browsers and mobile applications with Real-Time Communications (RTC) capabilities via simple APIs. It's supported by most major browsers (except Safari).

WebRTC APIs

To acquire and communicate streaming data, WebRTC implements the following APIs:

• MediaStream: get access to data streams, such as from the user's camera and microphone.

facundoolano

(def panels {:panel1 [panel1]
             :panel2 [panel2]})

(defn high-level-view 
  []
  (let [active (re-frame/subscribe [:active-panel])]
    (fn []
      [:div
       [:div.title   "Heading"]
       (get panels @active)])))

facundoolano

(re-frame/reg-event-fx
 :navigate
 (fn [{:keys [db]} [_ new-view]]
   {;; trigger the load-view event in case data from the server is required
    :dispatch    [:load-view new-view] 
    ;; update the browser history API and switch to the given view
    :set-history new-view
    ;; set the current view in the app-db so the dom is updated
    :db          (assoc db
                        :loading-view? true

facundoolano

[forms/form-view {:submit-text "Register"
                  :on-submit   [:register-submit]
                  :fields      [{:key      :email
                                 :type     "email"
                                 :validate :valid-email?
                                 :required true}
                                {:key      :password
                                 :type     "password"
                                 :required true}
                                {:key      :password-repeat

facundoolano

(re-frame/reg-sub
 :valid-required?
 (fn [db [_ value]]
   (if (string/blank? value)
     [false "This field is required."]
     [true])))

(re-frame/reg-sub
 :valid-form?
 (fn [[_ form fields]]