           current-index (om/get-state this :current-index)]
       ;;(log "Looper: render:" props)
       ;;(log "Looper: render: current-index" current-index)
-      (js/setTimeout #(.inc-index this) 4000)
       (html [:p (nth things current-index)]))))
 
-
 (def looper (om/factory Looper))

    [sablono.core :as html :refer-macros [html]]
    [om-next-datascript-localisation-demo.logging :refer-macros [log]]))


(defui Looper
  Object
  (initLocalState [this]
    {:current-index 0})

  (inc-index [this]
    (let [props (om/props this)

          current-index (om/get-state this :current-index)
          new-index (inc current-index)
          new-index (if (>= new-index length) 0 new-index)]
      ;;(log "Looper: inc-index")
      (om/update-state! this assoc :current-index new-index)))

  (render [this]
    (let [props (om/props this)
