elm-format

src/Internal/Api/Credentials.elm

@@ -76,12 +76,14 @@ fromBaseUrl url =
         , vs = Nothing
         }
 
+
 {-| Get the user id registered by the `Credentials` type.
 -}
 getUserId : Credentials -> Maybe String
 getUserId (Credentials { access }) =
     Login.getUserId access
 
+
 {-| Retrieves the spec versions from a given `Credentials` value.
 -}
 versions : Credentials -> Maybe V.Versions

src/Internal/Tools/LoginValues.elm

@@ -56,21 +56,23 @@ getToken t =
         UsernameAndPassword { token } ->
             token
 
+
 getUserId : AccessToken -> Maybe String
 getUserId t =
     case t of
         NoAccess ->
             Nothing
-        
+
         RawAccessToken _ ->
             Nothing
-        
+
         DetailedAccessToken { userId } ->
             Just userId
-        
+
         UsernameAndPassword { userId } ->
             userId
 
+
 addToken : String -> AccessToken -> AccessToken
 addToken s t =
     case t of

src/Internal/Vault.elm

@@ -334,10 +334,12 @@ updateWith vaultUpdate ((Vault ({ cred, context } as data)) as vault) =
         LoggedInWithUsernameAndPassword _ output ->
             Vault { data | context = Credentials.addToken output.accessToken context }
 
+
 getUsername : Vault -> Maybe String
 getUsername (Vault { context }) =
     Credentials.getUserId context
 
+
 {-| Set personal account data
 -}
 setAccountData : String -> E.Value -> Vault -> Task X.Error VaultUpdate

src/Matrix.elm

@@ -137,6 +137,7 @@ accountData =
 
 The username is a `Maybe String` if the Vault hasn't had its first sync yet,
 and the API might not always be consistent on the username.
+
 -}
 username : Vault -> Maybe String
 username =