 
          [:li {:class-name "list__item--border-top"}]
 
-         [:li {:class-name "mdl-menu__item mdl-list__item"}
+         [:a {:class-name "mdl-menu__item mdl-list__item"}
           [:span {:class-name "mdl-list__item-primary-content"}
            [:i {:class-name "material-icons mdl-list__item-icon"} "attach_file"] "Publication"]]
 
-         [:li {:class-name "mdl-menu__item mdl-list__item"}
+         [:a {:class-name "mdl-menu__item mdl-list__item"
+              :href       "https://github.com/tmoerman/plongeur"}
           [:span {:class-name "mdl-list__item-primary-content"}
            [:i {:class-name "material-icons mdl-list__item-icon"} "link"] "Github"]]]))
 

            [kierros.async :refer [debounce]])
  (:require-macros [cljs.core.async.macros :refer [go go-loop]]))


(defn ascii [c] (-> c {\f 70
                       \l 76
                       \s 83} str))

(defn nav! [url] #(set! (.-location js/window) url))

;; Set MDL upgrade interval


            :view/create-scene  [:h1 {} "create-scene"]
            :view/edit-scene    (Grid state cmd-chans)
            :view/edit-config   [:h1 {} "edit-config"]

                                [:h1 {} "uh-oh"])

          ]]))

