broke long line
This commit is contained in:
parent
09c63da8bf
commit
ceb8132a13
|
@ -96,7 +96,8 @@ gameStateLSpec = describe "gameStateL" $ lensSpec gameStateL
|
||||||
where gs t = newGameState & gameType ?~ t
|
where gs t = newGameState & gameType ?~ t
|
||||||
|
|
||||||
createPlayerStateLSpec :: Spec
|
createPlayerStateLSpec :: Spec
|
||||||
createPlayerStateLSpec = describe "createPlayerStateL" $ lensSpec createPlayerStateL
|
createPlayerStateLSpec = describe "createPlayerStateL" $
|
||||||
|
lensSpec createPlayerStateL
|
||||||
-- getters
|
-- getters
|
||||||
[ ( "missing state", MainMenu, newCreatePlayerState )
|
[ ( "missing state", MainMenu, newCreatePlayerState )
|
||||||
, ( "with state", CreatePlayer cps1, cps1 )
|
, ( "with state", CreatePlayer cps1, cps1 )
|
||||||
|
|
Loading…
Reference in New Issue
Block a user