diff options
Diffstat (limited to 'ghc/InteractiveUI.hs')
-rw-r--r-- | ghc/InteractiveUI.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ghc/InteractiveUI.hs b/ghc/InteractiveUI.hs index 02a8670ef1..7fd9c8b1ab 100644 --- a/ghc/InteractiveUI.hs +++ b/ghc/InteractiveUI.hs @@ -849,7 +849,7 @@ runOneCommand eh gCmd = do checkInputForLayout :: String -> InputT GHCi (Maybe String) -> InputT GHCi (Maybe String) checkInputForLayout stmt getStmt = do - dflags' <- lift $ getDynFlags + dflags' <- getDynFlags let dflags = xopt_set dflags' Opt_AlternativeLayoutRule st0 <- getGHCiState let buf' = stringToStringBuffer stmt |