From 5ead4f8162873db7d627cf1c2d0b64413d51ef38 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Tue, 12 Jan 2016 12:35:55 -0400 Subject: add missing Control.Applicative imports for old ghc --- src/Propellor/Git.hs | 2 ++ src/Propellor/Git/Config.hs | 2 ++ 2 files changed, 4 insertions(+) diff --git a/src/Propellor/Git.hs b/src/Propellor/Git.hs index 5a16b3db..949f430b 100644 --- a/src/Propellor/Git.hs +++ b/src/Propellor/Git.hs @@ -4,6 +4,8 @@ import Utility.Process import Utility.Exception import System.Directory +import Control.Applicative +import Prelude getCurrentBranch :: IO String getCurrentBranch = takeWhile (/= '\n') diff --git a/src/Propellor/Git/Config.hs b/src/Propellor/Git/Config.hs index 97835231..f5b6678d 100644 --- a/src/Propellor/Git/Config.hs +++ b/src/Propellor/Git/Config.hs @@ -7,6 +7,8 @@ import Utility.SafeCommand import Utility.Monad import Control.Monad +import Control.Applicative +import Prelude getGitConfigValue :: String -> IO (Maybe String) getGitConfigValue key = do -- cgit v1.2.3