           {:title "Quick tutorial"}
 
           {:subtitle "put and take"
-           :builder (PutAndTakeSlide.)}
+           :custom (PutAndTakeSlide.)}
 
           {:title "Buffers"
            :code "(<! (chan))"}

             [:h2 subtitle]
             )

           (when-let [builder (:builder data)]
             (when (satisfies? Slide (om/value builder))
               (render-slide (om/value builder) data owner)))

           (when-let [event (:event data)]
             [:div {:style {:text-align "center" :margin-top "20pt"}}

           (when-let [code (:code data)]
             (om/build source-snippet data {:opts "filter"})
             )
           ]
          ])))))

(defn set-slide-class! [app n max clz]
