packages feed

werewolf 0.3.0.3 → 0.3.0.4

raw patch · 3 files changed

+16/−5 lines, 3 files

Files

CHANGELOG.md view
@@ -2,6 +2,12 @@  #### Upcoming +#### v0.3.0.4++*Revisions*++* Fixed dead werewolves being informed of votes. ([#24](https://github.com/hjwylde/werewolf/issues/24))+ #### v0.3.0.3  * Tidied up the help text to be smaller. ([#26](https://github.com/hjwylde/werewolf/issues/26))@@ -24,6 +30,12 @@  * Allowed `start` to work when the game has ended but `end` hasn't been called. ([#15](https://github.com/hjwylde/werewolf/issues/15)) * Added `quit` command. ([#13](https://github.com/hjwylde/werewolf/issues/13))++#### v0.2.0.2++*Revisions*++* Fixed dead werewolves being informed of votes. ([#24](https://github.com/hjwylde/werewolf/issues/24))  #### v0.2.0.1 
src/Game/Werewolf/Engine.hs view
@@ -101,12 +101,11 @@             advanceTurn      Werewolves -> do-        werewolvesCount <- uses players (length . filterAlive . filterWerewolves)+        aliveWerewolves <- uses players (filterAlive . filterWerewolves)         votes'          <- use votes -        when (werewolvesCount == Map.size votes') $ do-            werewolfNames <- uses players (map _name . filterWerewolves)-            tell $ map (uncurry $ playerMadeKillVoteMessage werewolfNames) (Map.toList votes')+        when (length aliveWerewolves == Map.size votes') $ do+            tell $ map (uncurry . playerMadeKillVoteMessage $ map _name aliveWerewolves) (Map.toList votes')              advanceTurn 
werewolf.cabal view
@@ -1,5 +1,5 @@ name:           werewolf-version:        0.3.0.3+version:        0.3.0.4  author:         Henry J. Wylde maintainer:     public@hjwylde.com