From 8c1eeaeef7b7a6c9d6544d37b64625299053f190 Mon Sep 17 00:00:00 2001 From: Fendor Date: Wed, 2 Nov 2022 14:16:49 +0100 Subject: [PATCH] Ignore failing cabal-fmt test on windows --- plugins/hls-cabal-fmt-plugin/test/Main.hs | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/plugins/hls-cabal-fmt-plugin/test/Main.hs b/plugins/hls-cabal-fmt-plugin/test/Main.hs index 04c42726c06..35d6fe6ba86 100644 --- a/plugins/hls-cabal-fmt-plugin/test/Main.hs +++ b/plugins/hls-cabal-fmt-plugin/test/Main.hs @@ -1,12 +1,11 @@ {-# LANGUAGE CPP #-} {-# LANGUAGE OverloadedStrings #-} -{-# LANGUAGE CPP #-} module Main ( main ) where import qualified Ide.Plugin.CabalFmt as CabalFmt -import System.Directory (findExecutable) +import System.Directory (findExecutable) import System.FilePath import Test.Hls @@ -36,10 +35,12 @@ cabalFmtPlugin = CabalFmt.descriptor mempty "cabal-fmt" tests :: CabalFmtFound -> TestTree tests found = testGroup "cabal-fmt" - [ cabalFmtGolden found "formats a simple document" "simple_testdata" "formatted_document" $ \doc -> do + [ knownBrokenOnWindows "Eats newlines between comments" $ + cabalFmtGolden found "formats a simple document" "simple_testdata" "formatted_document" $ \doc -> do formatDoc doc (FormattingOptions 2 True Nothing Nothing Nothing) - , cabalFmtGolden found "formats a document with expand:src comment" "commented_testdata" "formatted_document" $ \doc -> do + , knownBrokenOnWindows "expand:src comment bug in cabal-fmt on windows" $ + cabalFmtGolden found "formats a document with expand:src comment" "commented_testdata" "formatted_document" $ \doc -> do formatDoc doc (FormattingOptions 2 True Nothing Nothing Nothing) , cabalFmtGolden found "formats a document with lib information" "lib_testdata" "formatted_document" $ \doc -> do