Sign upLogin

timjb/halma

View on GitHub
Star
halma-gui/src/Main.hs

Summary

Maintainability
Test Coverage

Use section
Open

          ] ++ map (flip button ButtonInactive) ["Four Players", "Five Players", "Six Players"]
Severity: Minor
Found in halma-gui/src/Main.hs by hlint

Found

(flip button ButtonInactive)

Perhaps

(`button` ButtonInactive)

Redundant $
Open

          , map (\(numStr, players') -> button (numStr ++ " Players") (configButtonAction (playersOnLargeGrid players'))) $
            [ ("Two", TwoPlayers () ())
            , ("Three", ThreePlayers () () ())
            , ("Four", FourPlayers () () () ())
            , ("Five", FivePlayers () () () () ())
Severity: Minor
Found in halma-gui/src/Main.hs by hlint

Found

map
  (\ (numStr, players') ->
     button (numStr ++ " Players")
       (configButtonAction (playersOnLargeGrid players')))
  $
  [("Two", TwoPlayers () ()), ("Three", ThreePlayers () () ()),
   ("Four", FourPlayers () () () ()),
   ("Five", FivePlayers () () () () ()),
   ("Six", SixPlayers () () () () () ())]

Perhaps

map
  (\ (numStr, players') ->
     button (numStr ++ " Players")
       (configButtonAction (playersOnLargeGrid players')))
  [("Two", TwoPlayers () ()), ("Three", ThreePlayers () () ()),
   ("Four", FourPlayers () () () ()),
   ("Five", FivePlayers () () () () ()),
   ("Six", SixPlayers () () () () () ())]

There are no issues that match your filters.

Category
Status