mirror of
https://github.com/TheAnachronism/docspell.git
synced 2025-06-23 10:58:26 +00:00
Fix elm-analyse issues
This commit is contained in:
@ -192,10 +192,10 @@ jsonResolver decoder =
|
||||
Http.NetworkError_ ->
|
||||
Err Http.NetworkError
|
||||
|
||||
Http.BadStatus_ metadata body ->
|
||||
Http.BadStatus_ metadata _ ->
|
||||
Err (Http.BadStatus metadata.statusCode)
|
||||
|
||||
Http.GoodStatus_ metadata body ->
|
||||
Http.GoodStatus_ _ body ->
|
||||
case D.decodeString decoder body of
|
||||
Ok value ->
|
||||
Ok value
|
||||
|
@ -12,9 +12,6 @@ crazyEncode str =
|
||||
let
|
||||
b64 =
|
||||
Base64.encode str
|
||||
|
||||
len =
|
||||
String.length b64
|
||||
in
|
||||
case String.right 2 b64 |> String.toList of
|
||||
'=' :: '=' :: [] ->
|
||||
|
Reference in New Issue
Block a user