                         (caps-tidy (story index)))
                    (button {:key       2
                             :bordered  true
-                            ;:small true
                             :textStyle {:color (:accent palette)}
                             :style     {:borderWidth 0}
                             :onPress   #(do (reset! story-index index)
                                             (.push navigator "tabs"))}
-                           (show-icon palette)
-                           ;(txt "")
-                           ))
-        ))
-
-
+                           (show-icon palette)))))
 
 (rum/defcs page < rum/reactive
                   (rum/local 0 ::selection) (add-page-title "Scenarios")

  (n-icon {:name  "ios-add-circle-outline"
           :key   (gensym "add")
           :style {:color     (:accent palette)
                   :transform [{:scale 1.67}]}
           }))


(defn bars-icon [palette]
  (n-icon {:name  "ios-stats"
           :key   (gensym "bars")
           :style {:width 9
                   ;:paddingRight 5
                   :color (:accent palette)
                   }}))

(defn select-palette-item! [index]
  (n-list-item

            :selected (= @palette-index index)})
    (txt {:key 2} (palette-titles index))))

(def card-style {:flex         1
                 :marginLeft   15
                 :marginRight  15
                 :marginTop    5
                 :marginBottom 0})

(def card-item-style {:backgroundColor "white"
                      :justifyContent  "flex-start"
                      :flexDirection   "row"
                      :alignItems      "center"
                      :padding         10})

(defn add-card! [navigator palette]
  (card {:key   (gensym "add-card")
         :style card-style}
        (card-item {:header true
                    :key    1
                    :style  card-item-style}
                   (txt {:key   1
                         :style {:flex       4
                                 :marginLeft 34
