 (ns kanban.core
   (:require [reagent.core :as reagent]))
 
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; App located at:
+;; http://localhost:3451/index.html
+
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; Debugging in the browser
 (enable-console-print!)
 
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; Model / State
 (def board
   (reagent/atom
    {:columns

     [Column (reagent/cursor board [:columns i])])
   [NewColumn]])

;; (def cards-cursor
;;   (reagent/cursor board [:columns 0 :cards]))

;; @cards-cursor

;; (swap! cards-cursor conj {:title "New card in column 0"})

(reagent/render [Board board] (js/document.getElementById "app"))


      :cards [{:title "Following the Reagent tutorial"}
              {:title "Using Evil mode badly"
               :editing true}]
      }]}))


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Actions

(defn- update-title [card-cursor title]
  (swap! card-cursor assoc :title title))
