diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -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
 
diff --git a/src/Game/Werewolf/Engine.hs b/src/Game/Werewolf/Engine.hs
--- a/src/Game/Werewolf/Engine.hs
+++ b/src/Game/Werewolf/Engine.hs
@@ -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
 
diff --git a/werewolf.cabal b/werewolf.cabal
--- a/werewolf.cabal
+++ b/werewolf.cabal
@@ -1,5 +1,5 @@
 name:           werewolf
-version:        0.3.0.3
+version:        0.3.0.4
 
 author:         Henry J. Wylde
 maintainer:     public@hjwylde.com