X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Fmain%2FHeaderInfo.hs;h=24a216a4abf54c1bd20b53d0b2a2d9321612953a;hp=4e455a622c385028db342d2ba094204d981ec6f2;hb=d0faaa6fa0cecd23c5670fd199e9206275313666;hpb=94bf0d3604ff0d2ecab246924af712bdd1c29a40

diff --git a/compiler/main/HeaderInfo.hs b/compiler/main/HeaderInfo.hs
index 4e455a6..24a216a 100644
--- a/compiler/main/HeaderInfo.hs
+++ b/compiler/main/HeaderInfo.hs
@@ -284,7 +284,8 @@ unsupportedExtnError loc unsup =
     mkPlainErrMsg loc $
         text "Unsupported extension: " <> text unsup $$
         if null suggestions then empty else text "Perhaps you meant" <+> quotedListWithOr (map text suggestions)
-  where suggestions = fuzzyMatch unsup supportedLanguagesAndExtensions
+  where
+     suggestions = fuzzyMatch unsup supportedLanguagesAndExtensions
 
 
 optionsErrorMsgs :: [String] -> [Located String] -> FilePath -> Messages