little bug fix

zazedd · May 24, 2023 · 508e9eb · 508e9eb
1 parent 3488527
commit 508e9eb
Show file tree

Hide file tree

Showing 3 changed files with 9 additions and 8 deletions.
diff --git a/src/Dashboard.elm b/src/Dashboard.elm
@@ -43,7 +43,7 @@ playlists =
                   td [ class "table-dark" ]
                     [ text playlist.name ]
                 , td [ class "table-dark" ]
-                    [ a [ href ("https://open.spotify.com/playlist/" ++ playlist.id) ] [ text "Link" ]
+                    [ a [ href playlist.url ] [ text "Link" ]
                     ]
 
                 -- , th [ class "table-dark" ]
@@ -64,12 +64,13 @@ dashboard model =
                     [ div [ class "center-content" ] [ text "Please login first!" ]
                     ]
 
-                Just _ ->
+                Just u ->
                     [ p [ id "admintitle" ]
                         [ text "Dashboard" ]
                     , div
                         [ class "admin-content" ]
-                        [ div
+                        [ div [] [ p [ style "margin" "0" ] [ text ("Hi " ++ u.username ++ "!") ] ]
+                        , div
                             [ style "display" "flex"
                             , style "justify-content" "center"
                             , style "align-items"

diff --git a/src/Main.elm b/src/Main.elm
@@ -407,15 +407,15 @@ update msg model =
                 Just p ->
                     let
                         url =
-                            "https://open.spotify.com/track/" ++ p.id
+                            "https://open.spotify.com/playlist/" ++ p.id
                     in
                     ( model, Common.storePlaylist p.name url model.token )
 
         PlaylistStoreRequest _ ->
             ( { model | errMsg = "Success!" }, Cmd.none )
 
         RestorePlaylist ->
-            ( { model | divvis = { visible1 = True, visible2 = False }, playlist = Nothing, tracks = Nothing, genre = "Rock", mood = 5 }, Cmd.none )
+            ( { model | divvis = { visible1 = True, visible2 = False }, playlist = Nothing, errMsg = "", tracks = Nothing, genre = "Rock", mood = 5 }, Cmd.none )
 
         LogoutSubmit ->
             let

diff --git a/style.css b/style.css
@@ -148,7 +148,7 @@ body {
 }
 
 .sidebar:hover ~ .main-content {
-  filter: blur(5px);
+  filter: blur(3px);
 }
 
 .admin-content {
@@ -164,7 +164,7 @@ body {
 }
 
 .sidebar:hover ~ .admin-content {
-  filter: blur(5px);
+  filter: blur(3px);
 }
 
 table {
@@ -269,7 +269,7 @@ table {
 }
 
 .sidebar:hover ~ .dashboard-content {
-  filter: blur(5px);
+  filter: blur(3px);
 }
 
 #pls-login {