         [[:text {:key "radio-left" :style {:content :ref/radio-left
                                            :color :ref/on-surface}} ""]
          [:text {:key "radio-check" :style {:content cursor
-                                           :color :ref/on-surface}} ""]
+                                           :color color}} ""]
          [:text {:key "radio-right" :style {:content :ref/radio-right
                                            :color :ref/on-surface}} ""]]
         children)]))

         (recur))) [])

    [:view props
      (cons [:text {:key "Checkbox-text"} (str "[" cursor "]")]
        children)]))

(g/defcomponent Radio

  (let [{:keys [title border children]} props]
    (log/info "Panel props" props)
    (log/info "Panel children" children)
    [:view {:style {:border (or border 1)
                    :background-color :ref/surface}}
      (cons [:text {:key "panel-title"
                    :style {:position :absolute
                            :height 1 :width (+ 2 (count title))
