From 5e4026b9463b5e2fc76c5bf046a3a6fbf5a60952 Mon Sep 17 00:00:00 2001
From: Nikolay Yakimov <root@livid.pp.ru>
Date: Sun, 20 Dec 2015 15:34:14 +0300
Subject: [PATCH] GHC 7.8 mtl compat

---
 src/GHCMod/Options/Help.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/GHCMod/Options/Help.hs b/src/GHCMod/Options/Help.hs
index 2a81e16..8cd56ef 100644
--- a/src/GHCMod/Options/Help.hs
+++ b/src/GHCMod/Options/Help.hs
@@ -35,7 +35,7 @@ para :: String -> Doc
 para = PP.fillSep . map PP.text . words
 
 append :: Doc -> MyDocM (Maybe Doc) a
-append s = modify' m >> return undefined
+append s = modify m >> return undefined
   where
     m :: Maybe Doc -> Maybe Doc
     m Nothing = Just s