put switzerland on top

timeforcoffee · Oct 21, 2015 · 666fbf2 · 666fbf2
1 parent 3f723c2
commit 666fbf2
Showing 1 changed file with 4 additions and 3 deletions.
diff --git a/src/cljs/tramboard_clj/script/util.cljs b/src/cljs/tramboard_clj/script/util.cljs
@@ -2,14 +2,15 @@
   (:require-macros [cljs.core.async.macros :refer [go]]))
 
 (defonce locations
-  [{:id :ch_zh  :name "Zurich City & Canton" :short-label "Zurich"             :flag-class "ch_zh" :api "zvv" :active true}
+  [
+   {:id :ch     :name "Whole Switzerland"  :short-label "Switzerland" :flag-class "ch"    :api "ch" :active true}])
+   {:id :ch_zh  :name "Zurich City & Canton" :short-label "Zurich"             :flag-class "ch_zh" :api "zvv" :active true}
    {:id :ch_ge  :name "Geneva City & Canton" :short-label "Geneva"             :flag-class "ch_ge" :api "gva" :active true}
    {:id :ch_lu  :name "Lucerne & parts of Central Switzerland" :short-label "Lucerne" :flag-class "ch_lu" :api "vbl" :active true}
    {:id :ch_bs  :name "Basel City" :short-label "Basel"   :flag-class "ch_bs" :api "bvb" :active true}
    ;{:id :ch_nw  :name "Nordwestschweiz" :short-label "Nordwestschweiz" :flag-class "ch_bs" :api "blt" :active true}
    ;{:id :ch_os  :name "Ostschweiz" :short-label "Ostschweiz" :flag-class "ch_os" :api "ost" :active true}
-   {:id :ch     :name "Rest of Switzerland"  :short-label "Switzerland" :flag-class "ch"    :api "ch" :active true}])
-
+
 
 
 (defn get-location [location-id]