noordstar
/
elm-matrix-sdk-beta
mirror of https://github.com/noordstar/elm-matrix-sdk-beta
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Remove warnings

pull/7/head
Bram 2023-12-29 14:57:59 +01:00
parent e1a4bcab9b
commit 5cdb4fad33
2 changed files with 5 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/Internal/Values/StateManager.elm
View File

@ -61,11 +61,11 @@ append sm2 sm1 =
List.foldl insert sm1 (values sm2) List.foldl insert sm1 (values sm2)
{-| Remove any floating empty Mashdicts from ALL keys in the dictionary. -- {-| Remove any floating empty Mashdicts from ALL keys in the dictionary.
-} -- -}
cleanAll : StateManager -> StateManager -- cleanAll : StateManager -> StateManager
cleanAll ((StateManager manager) as sm) = -- cleanAll ((StateManager manager) as sm) =
List.foldl cleanKey sm (Dict.keys manager) -- List.foldl cleanKey sm (Dict.keys manager)
{-| To keep the StateManager as simple as possible, you can keep the dictionary {-| To keep the StateManager as simple as possible, you can keep the dictionary

1
tests/Test/Values/StateManager.elm
View File

@ -2,7 +2,6 @@ module Test.Values.StateManager exposing (..)
import Expect import Expect
import Fuzz exposing (Fuzzer) import Fuzz exposing (Fuzzer)
import Internal.Values.Event as Event
import Internal.Values.StateManager as StateManager exposing (StateManager) import Internal.Values.StateManager as StateManager exposing (StateManager)
import Json.Decode as D import Json.Decode as D
import Json.Encode as E import Json.Encode as E