diff --git a/src/Internal/Api/BaseUrl/Api.elm b/src/Internal/Api/BaseUrl/Api.elm index 5e98ed3..21333dc 100644 --- a/src/Internal/Api/BaseUrl/Api.elm +++ b/src/Internal/Api/BaseUrl/Api.elm @@ -13,7 +13,6 @@ This module looks for the right homeserver address. import Internal.Api.Chain as C import Internal.Api.Request as R -import Internal.Config.Leaks as L import Internal.Config.Log exposing (log) import Internal.Config.Text as Text import Internal.Tools.Json as Json diff --git a/src/Internal/Api/GetEvent/Api.elm b/src/Internal/Api/GetEvent/Api.elm index dd10f0d..e81c599 100644 --- a/src/Internal/Api/GetEvent/Api.elm +++ b/src/Internal/Api/GetEvent/Api.elm @@ -204,7 +204,7 @@ getEventCoderV1 = [ "UnsignedData as described by the Matrix spec" , "https://spec.matrix.org/v1.10/client-server-api/#get_matrixclientv3roomsroomideventeventid" ] - , init = \a b c d -> Event.UnsignedData { age = a, prevContent = b, redactedBecause = c, transactionId = d } + , init = \a b c d -> Event.UnsignedData { age = a, membership = Nothing, prevContent = b, redactedBecause = c, transactionId = d } } (Json.field.optional.value { fieldName = "age" diff --git a/src/Internal/Api/LoginWithUsernameAndPassword/Api.elm b/src/Internal/Api/LoginWithUsernameAndPassword/Api.elm index 9242ba2..b5cddcd 100644 --- a/src/Internal/Api/LoginWithUsernameAndPassword/Api.elm +++ b/src/Internal/Api/LoginWithUsernameAndPassword/Api.elm @@ -13,7 +13,6 @@ This module allows the user to log in using a username and password. import Internal.Api.Api as A import Internal.Api.Request as R -import Internal.Config.Leaks as L import Internal.Config.Log exposing (log) import Internal.Config.Text as Text import Internal.Tools.Json as Json diff --git a/src/Internal/Api/SendMessageEvent/Api.elm b/src/Internal/Api/SendMessageEvent/Api.elm index abccf41..9e298f0 100644 --- a/src/Internal/Api/SendMessageEvent/Api.elm +++ b/src/Internal/Api/SendMessageEvent/Api.elm @@ -13,7 +13,6 @@ This module helps send message events to rooms on the Matrix API. import Internal.Api.Api as A import Internal.Api.Request as R -import Internal.Config.Leaks as L import Internal.Config.Log exposing (log) import Internal.Config.Text as Text import Internal.Tools.Json as Json diff --git a/src/Internal/Api/Sync/V4.elm b/src/Internal/Api/Sync/V4.elm index aa03724..b574997 100644 --- a/src/Internal/Api/Sync/V4.elm +++ b/src/Internal/Api/Sync/V4.elm @@ -12,7 +12,6 @@ This API module represents the /sync endpoint on Matrix spec version v1.11. -} import FastDict as Dict exposing (Dict) -import Internal.Api.Sync.V3 as PV import Internal.Config.Log exposing (Log, log) import Internal.Config.Text as Text import Internal.Filter.Timeline exposing (Filter) diff --git a/src/Internal/Grammar/ServerName.elm b/src/Internal/Grammar/ServerName.elm index 4b9f1b6..4899881 100644 --- a/src/Internal/Grammar/ServerName.elm +++ b/src/Internal/Grammar/ServerName.elm @@ -189,21 +189,20 @@ ipv6RightParser n = |. P.symbol ":" -{-| Convert an IPv6 address to a readable string format --} -ipv6ToString : IPv6Address -> String -ipv6ToString { front, back } = - (if List.length front == 8 then - front - else if List.length back == 8 then - back - - else - List.concat [ front, [ "" ], back ] - ) - |> List.intersperse ":" - |> String.concat +-- {-| Convert an IPv6 address to a readable string format +-- -} +-- ipv6ToString : IPv6Address -> String +-- ipv6ToString { front, back } = +-- (if List.length front == 8 then +-- front +-- else if List.length back == 8 then +-- back +-- else +-- List.concat [ front, [ "" ], back ] +-- ) +-- |> List.intersperse ":" +-- |> String.concat portParser : Parser Int