From 85c1fb81bd0789233dec6fa1a5e4d29c8f43dbd9 Mon Sep 17 00:00:00 2001
From: Harmen <alicebob@lijzij.de>
Date: Tue, 13 Mar 2018 14:13:23 +0100
Subject: [PATCH] only show the wanted artist or albumartist tab

---
 docroot/s/siren.css |  2 +-
 elm/Main.elm        | 12 +++++++-----
 2 files changed, 8 insertions(+), 6 deletions(-)

diff --git a/docroot/s/siren.css b/docroot/s/siren.css
index 4f04fc7..c682e09 100644
--- a/docroot/s/siren.css
+++ b/docroot/s/siren.css
@@ -33,7 +33,7 @@ body {
 nav {
     background-color: #3F51B5;
     display: grid;
-    grid-template-columns: max-content 1fr repeat(4, max-content) 1fr max-content;
+    grid-template-columns: max-content 1fr repeat(3, max-content) 1fr max-content;
     grid-gap: 50px;
     padding: 0 50px;
     box-shadow: 0 3px 3px 0 #ccc;
diff --git a/elm/Main.elm b/elm/Main.elm
index 7fc6c8b..e22b5ff 100644
--- a/elm/Main.elm
+++ b/elm/Main.elm
@@ -490,7 +490,7 @@ viewHeader model =
         count =
             " (" ++ (toString <| List.length model.playlist) ++ ")"
 
-        tab what t =
+        tab what t title =
             Html.a
                 [ Events.onClick <| Show what
                 , Attr.class <|
@@ -501,6 +501,7 @@ viewHeader model =
                             else
                                 "inactive"
                            )
+                , Attr.title title
                 ]
                 [ text t ]
 
@@ -531,10 +532,11 @@ viewHeader model =
             ]
             [ text "Siren!" ]
         , Html.span [] []
-        , tab Playlist <| "Playlist" ++ count
-        , tab FileBrowser "Files"
-        , tab (ArtistBrowser Artist) "Artists"
-        , tab (ArtistBrowser Albumartist) "Albumartists"
+        , tab Playlist ("Playlist" ++ count) "Show playlist"
+        , tab FileBrowser "Files" "Browse the filesystem"
+        , case artistMode model.config of
+            Artist -> tab (ArtistBrowser Artist) "Artists" "Browse artists"
+            Albumartist -> tab (ArtistBrowser Albumartist) "Artists" "Browse AlbumArtists"
         , Html.span [] []
         , Html.a
             [ Attr.class <| "status " ++ cssClass