fixup! docker: proxy common signals to container (#547)

commercialhaskell · Jul 28, 2015 · 63f44c7 · 63f44c7
1 parent 425eece
commit 63f44c7
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/Stack/Docker.hs b/src/Stack/Docker.hs
@@ -26,7 +26,7 @@ import           Control.Monad.IO.Class (MonadIO,liftIO)
 import           Control.Monad.Logger (MonadLogger,logError,logInfo,logWarn)
 import           Control.Monad.Reader (MonadReader,asks)
 import           Control.Monad.Writer (execWriter,runWriter,tell)
-import           Control.Monad.Trans.Control (MonadBaseControl,liftBaseWith)
+import           Control.Monad.Trans.Control (MonadBaseControl)
 import           Data.Aeson.Extended (FromJSON(..),(.:),(.:?),(.!=),eitherDecode)
 import           Data.ByteString.Builder (stringUtf8,charUtf8,toLazyByteString)
 import qualified Data.ByteString.Char8 as BS
@@ -60,6 +60,7 @@ import           System.Process.Run
 import           Text.Printf (printf)
 
 #ifndef mingw32_HOST_OS
+import           Control.Monad.Trans.Control (liftBaseWith)
 import           System.Posix.Signals
 #endif