werewolf 0.2.0.1 → 0.2.0.2

raw patch · 3 files changed

+10/−5 lines, 3 files

Files

CHANGELOG.md +6/−0
src/Game/Werewolf/Engine.hs +3/−4
werewolf.cabal +1/−1

CHANGELOG.md view

@@ -2,6 +2,12 @@  #### Upcoming +#### v0.2.0.2++*Revisions*++* Fixed dead werewolves being informed of votes. ([#24](https://github.com/hjwylde/werewolf/issues/24))+ #### v0.2.0.1  *Revisions*

src/Game/Werewolf/Engine.hs view

@@ -80,12 +80,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 Player._name . filterWerewolves)-            tell $ map (uncurry $ playerMadeKillVoteMessage werewolfNames) (Map.toList votes')+        when (length aliveWerewolves == Map.size votes') $ do+            tell $ map (uncurry . playerMadeKillVoteMessage $ map Player._name aliveWerewolves) (Map.toList votes')              advanceTurn

werewolf.cabal view

@@ -1,5 +1,5 @@ name:           werewolf-version:        0.2.0.1+version:        0.2.0.2  author:         Henry J. Wylde maintainer:     public@hjwylde.com