Look-and-feel of dynamic pages now very good

This commit is contained in:
Simon Brooke 2017-03-16 19:39:27 +00:00
parent 6b9e315b2f
commit b4618a4311
2 changed files with 11 additions and 9 deletions

View file

@ -28,7 +28,7 @@
[:img {:id "nav-icon"
:src "img/threelines.png"
:on-click #(swap! collapsed? not)}]
[:menu.nav (merge {:id "nav-menu"} (when @collapsed? {:class "fred"}))
[:menu.nav {:id "nav-menu" :class (if @collapsed? "hidden" "shown")}
(nav-link "#/" "Home" :home collapsed?)
(nav-link "#/library" "Library" :library collapsed?)
(nav-link "#/register" "Register" :register collapsed?)