    #_[:div {:class "g-recaptcha"
           :data-sitekey settings/RECAPTCHA-KEY}]])
 
+(defn contacts
+  []
+  (let [language (subscribe [:current-language])]
+    #_[:div {:class "email"} "Email Address"]))
+
+(def SECTIONS
+  {:story story
+   :find-us find-us
+   ;; :rvsp rvsp
+   ;; :gifts gifts
+   ;;:accomodation accommodation
+   :contacts contacts
+   })
+
+;; this is quite bootstrap specific in a way
+;; would be good to extract even further
+(defn navbar
+  []
+  (let [language (subscribe [:current-language])
+        tr (fn [s] (translate @language s))]
+
+    (fn []
+      [:nav {:class "navbar navbar-dark bg-primary"}
+       [:div {:class "container-fluid"}
+        [:div {:class "navbar-header"}
+         [:a {:class "navbar-brand" :href "#"} "Home" ]]
+
+        (into
+         [:ul {:class "nav navbar-nav"}]
+         (for [sec (keys SECTIONS)]
+           [:li {:key (name sec)}
+            [:a {:href (str "#" (name sec))} (tr sec)]]))
+        
+        #_[:ul {:class "nav navbar-right" :key "language"}
+         (lang-selection @language)]
+        ]])))
+
 ;; devtools does not seem to be set up correctly
 ;; since it doesn't find hints.js for example
 ;; (log "hello")

(defn main-panel
  []
  (fn []
    [:g
     (into [navbar]
           (vals SECTIONS))]))

    (if (clojure.string/starts-with? browser-lang "it")
      :italian
      :english)))

;; should dispatch the right language also here of course
(defn add-to-calendar
