(ns auto-ap.views.components.level (:require [reagent.core :as r])) (defn left-stack [] (let [children (r/children (r/current-component))] [:div.level (r/props (r/current-component)) (into [:div.level-left] (for [c children] [:div.level-item c]))]))