 ; View
 ;
 
-(defn notes []
+(defn notes [start]
   "Returns 10 items from data"
   (map
     (fn [item]
       (let [title (get item "title")]
           (m "li" nil title)))
-    (take 10 (:data db))))
+    (take PAGESIZE (drop start (:data db)))))
 
 (defn ctrl []
   (println "Calling major Tom")

  (println "Seeing things")
  (m "div" nil
     [(m "h1" {:style {:color "green"}} (:var db))
      (m "ol" nil (notes))]))

(def app {:controller ctrl :view viewer})


  (:require [foo.bar]
            [m]
            [ajax.core :refer [GET POST]]))

; Contants

(def ^:const PAGESIZE 10)

; Mithril helpers

