-1

CHANGELOG.md

reviewed

··· 9 9 - Improve onboarding 10 10 - Show processing progress on sources screen 11 11 - Show the amount of tracks you have 12 12 - - Show time and duration of the current track after hovering over the progress bar for a while 13 12 - Slightly improved tap/click events on tracks 14 13 - Smaller javascript files, ie. improved load time 15 14

-16

src/Applications/UI.elm

reviewed

··· 145 145 -- 146 146 , progress : Dict String Float 147 147 , rememberProgress : Bool 148 148 - , showTime : Bool 149 148 150 149 ----------------------------------------- 151 150 -- Children ··· 198 197 -- 199 198 , progress = Dict.empty 200 199 , rememberProgress = True 201 201 - , showTime = False 202 200 203 201 -- Children 204 202 ----------- ··· 259 257 | SetAudioIsLoading Bool 260 258 | SetAudioIsPlaying Bool 261 259 | SetAudioPosition Float 262 262 - | SetShowTime Bool 263 260 | Stop 264 261 ----------------------------------------- 265 262 -- Authentication ··· 503 500 504 501 SetAudioPosition position -> 505 502 return { model | audioPosition = position } 506 506 - 507 507 - SetShowTime bool -> 508 508 - return { model | showTime = bool } 509 503 510 504 Stop -> 511 505 returnWithModel model (Ports.pause ()) ··· 897 891 898 892 ToggleRememberProgress -> 899 893 translateReply SaveSettings { model | rememberProgress = not model.rememberProgress } 900 900 - 901 901 - ToggleTimeDisplay switch -> 902 902 - switch 903 903 - == On 904 904 - |> SetShowTime 905 905 - |> Debouncer.provideInput 906 906 - |> Debounce 907 907 - |> updateWithModel model 908 894 909 895 ----------------------------------------- 910 896 -- Authentication ··· 2057 2043 ( model.audioPosition 2058 2044 , model.audioDuration 2059 2045 ) 2060 2060 - { showTime = model.showTime 2061 2061 - } 2062 2046 ) 2063 2047 ] 2064 2048

+3 -46

src/Applications/UI/Console.elm

reviewed

··· 28 28 -- 🗺 29 29 30 30 31 31 - view : Maybe Queue.Item -> Bool -> Bool -> { stalled : Bool, loading : Bool, playing : Bool } -> ( Float, Float ) -> { showTime : Bool } -> Html Reply 32 32 - view activeQueueItem repeat shuffle { stalled, loading, playing } ( position, duration ) { showTime } = 31 31 + view : Maybe Queue.Item -> Bool -> Bool -> { stalled : Bool, loading : Bool, playing : Bool } -> ( Float, Float ) -> Html Reply 32 32 + view activeQueueItem repeat shuffle { stalled, loading, playing } ( position, duration ) = 33 33 brick 34 34 [ css consoleStyles ] 35 35 [ T.mt1, T.tc, T.w_100 ] ··· 54 54 else if loading then 55 55 text "Loading track ..." 56 56 57 57 - else if showTime && Maybe.isJust activeQueueItem then 58 58 - let 59 59 - minutes = 60 60 - floor (position / 60) 61 61 - 62 62 - seconds = 63 63 - max 0 (floor position - minutes * 60) 64 64 - 65 65 - m = 66 66 - minutes 67 67 - |> String.fromInt 68 68 - |> String.padLeft 2 '0' 69 69 - 70 70 - s = 71 71 - seconds 72 72 - |> String.fromInt 73 73 - |> String.padLeft 2 '0' 74 74 - 75 75 - totalMinutes = 76 76 - floor (duration / 60) 77 77 - 78 78 - totalSeconds = 79 79 - max 0 (floor duration - totalMinutes * 60) 80 80 - 81 81 - tm = 82 82 - totalMinutes 83 83 - |> String.fromInt 84 84 - |> String.padLeft 2 '0' 85 85 - 86 86 - ts = 87 87 - totalSeconds 88 88 - |> String.fromInt 89 89 - |> String.padLeft 2 '0' 90 90 - in 91 91 - raw 92 92 - [ text (m ++ ":" ++ s) 93 93 - , inline [ T.dib, T.mh1 ] [ text "of" ] 94 94 - , text (tm ++ ":" ++ ts) 95 95 - ] 96 96 - 97 57 else 98 58 case Maybe.map .identifiedTrack activeQueueItem of 99 59 Just ( _, { tags } ) -> ··· 120 80 (position / duration) * 100 121 81 in 122 82 brick 123 123 - [ on "click" (clickLocationDecoder Seek) 124 124 - , Html.Styled.Events.onMouseOver (ToggleTimeDisplay On) 125 125 - , Html.Styled.Events.onMouseOut (ToggleTimeDisplay Off) 126 126 - ] 83 83 + [ on "click" (clickLocationDecoder Seek) ] 127 84 [ T.pointer 128 85 , T.pv1 129 86 ]

-1

src/Applications/UI/Reply.elm

reviewed

··· 27 27 | Seek Float 28 28 | TogglePlayPause 29 29 | ToggleRememberProgress 30 30 - | ToggleTimeDisplay Switch 31 30 ----------------------------------------- 32 31 -- Authentication 33 32 -----------------------------------------

+1 -1

src/Applications/UI/Tracks/Scene/List.elm

reviewed

··· 188 188 189 189 derivedColors = 190 190 { default = Color.toCssString color 191 191 - , dark = Color.toCssString (Color.darken 0.325 color) 191 191 + , dark = Color.toCssString (Color.darken 0.3 color) 192 192 , light = Color.toCssString (Color.fadeOut 0.625 color) 193 193 } 194 194 in