A music player that connects to your cloud/distributed storage.
5
fork

Configure Feed

Select the types of activity you want to include in your feed.

Remove remaining Debug.log

-22
-22
src/Library/Syncing.elm
··· 1 1 module Syncing exposing (LocalConfig, RemoteConfig, task) 2 2 3 - import DateFormat as Date 4 3 import Json.Decode as Decode 5 4 import Json.Encode as Json 6 5 import Maybe.Extra as Maybe ··· 66 65 |> Task.andThen 67 66 (\maybeModifiedAt -> 68 67 let 69 - formatDate = 70 - Date.format 71 - [ Date.monthNameAbbreviated 72 - , Date.text " " 73 - , Date.dayOfMonthSuffix 74 - , Date.text " " 75 - , Date.yearNumber 76 - , Date.text ", " 77 - , Date.hourMilitaryFixed 78 - , Date.text ":" 79 - , Date.minuteFixed 80 - , Date.text ":" 81 - , Date.secondFixed 82 - ] 83 - 84 68 maybeRemoteModifiedAt = 85 69 Maybe.andThen 86 70 (Decode.decodeValue Time.decoder >> Result.toMaybe) 87 71 maybeModifiedAt 88 - 89 - _ = 90 - Debug.log "remote" (Maybe.map (formatDate Time.utc) maybeRemoteModifiedAt) 91 - 92 - _ = 93 - Debug.log "local" (Maybe.map (formatDate Time.utc) localConfig.localData.modifiedAt) 94 72 in 95 73 case ( maybeRemoteModifiedAt, localConfig.localData.modifiedAt ) of 96 74 ( Just remoteModifiedAt, Just localModifiedAt ) ->