diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -2,6 +2,12 @@
 
 #### Upcoming
 
+#### v0.4.2.2
+
+*Revisions*
+
+* Fixed a bug causing the Witch being unable to heal themselves. ([#76](https://github.com/hjwylde/werewolf/issues/76))
+
 #### v0.4.2.1
 
 *Revisions*
@@ -13,6 +19,13 @@
 *Minor*
 
 * Added the Villager role. ([#37](https://github.com/hjwylde/werewolf/issues/37))
+
+#### v0.4.1.2
+
+*Revisions*
+
+* Added missing module to Cabal file.
+>>>>>>> release/0.4.1
 
 #### v0.4.1.1
 
diff --git a/app/Werewolf/Commands/Heal.hs b/app/Werewolf/Commands/Heal.hs
new file mode 100644
--- /dev/null
+++ b/app/Werewolf/Commands/Heal.hs
@@ -0,0 +1,43 @@
+{-|
+Module      : Werewolf.Commands.Heal
+Description : Handler for the heal subcommand.
+
+Copyright   : (c) Henry J. Wylde, 2015
+License     : BSD3
+Maintainer  : public@hjwylde.com
+
+Handler for the heal subcommand.
+-}
+
+{-# LANGUAGE OverloadedStrings #-}
+
+module Werewolf.Commands.Heal (
+    -- * Handle
+    handle,
+) where
+
+import Control.Monad.Except
+import Control.Monad.Extra
+import Control.Monad.State
+import Control.Monad.Writer
+
+import Data.Text (Text)
+
+import Game.Werewolf.Command
+import Game.Werewolf.Engine
+import Game.Werewolf.Response
+
+-- | Handle.
+handle :: MonadIO m => Text -> m ()
+handle callerName = do
+    unlessM doesGameExist $ exitWith failure {
+        messages = [noGameRunningMessage callerName]
+        }
+
+    game <- readGame
+
+    let command = healCommand callerName
+
+    case runExcept (runWriterT $ execStateT (apply command >> checkStage >> checkGameOver) game) of
+        Left errorMessages      -> exitWith failure { messages = errorMessages }
+        Right (game', messages) -> writeGame game' >> exitWith success { messages = messages }
diff --git a/werewolf.cabal b/werewolf.cabal
--- a/werewolf.cabal
+++ b/werewolf.cabal
@@ -1,5 +1,5 @@
 name:           werewolf
-version:        0.4.2.1
+version:        0.4.2.2
 
 author:         Henry J. Wylde
 maintainer:     public@hjwylde.com
@@ -29,6 +29,7 @@
     ghc-options:    -threaded -with-rtsopts=-N
     other-modules:
         Werewolf.Commands.End,
+        Werewolf.Commands.Heal,
         Werewolf.Commands.Help,
         Werewolf.Commands.Interpret,
         Werewolf.Commands.Pass,