Add clear button to regions input

intermine · Oct 27, 2016 · 3551350 · 3551350
1 parent faf8ae1
commit 3551350
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/src/cljs/redgenes/sections/regions/views.cljs b/src/cljs/redgenes/sections/regions/views.cljs
@@ -140,6 +140,9 @@
                            :data-placement "bottom"}]]]
                [region-input-box]
                [:div.btn-toolbar
+                [:button.btn.btn-warning
+                 {:on-click (fn [] (dispatch [:regions/set-to-search nil]))}
+                 "Clear"]
                 [:button.btn.btn-primary
                  {:on-click (fn [] (dispatch [:regions/set-to-search example-regions]))}
                  "Example"]]]]