From ae75872638e6cf52c5e6051241152c1cda9d4867 Mon Sep 17 00:00:00 2001 From: Kazu Yamamoto Date: Mon, 28 Apr 2014 14:36:46 +0900 Subject: [PATCH] fixing regression. --- Language/Haskell/GhcMod/Gap.hs | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/Language/Haskell/GhcMod/Gap.hs b/Language/Haskell/GhcMod/Gap.hs index ed4f159..d8b1b19 100644 --- a/Language/Haskell/GhcMod/Gap.hs +++ b/Language/Haskell/GhcMod/Gap.hs @@ -151,9 +151,7 @@ toStringBuffer = liftIO . stringToStringBuffer . unlines ---------------------------------------------------------------- fOptions :: [String] -#if __GLASGOW_HASKELL__ >= 706 -fOptions = [option | (option,_,_) <- fFlags] -#elif __GLASGOW_HASKELL__ >= 704 +#if __GLASGOW_HASKELL__ >= 704 fOptions = [option | (option,_,_) <- fFlags] ++ [option | (option,_,_) <- fWarningFlags] ++ [option | (option,_,_) <- fLangFlags]