From 72f303ab69bb7acdc371630a9de9ff9f394dd9ac Mon Sep 17 00:00:00 2001 From: Pepe Iborra Date: Sat, 20 Feb 2021 14:07:23 +0000 Subject: [PATCH] fix identifiers --- test/functional/Format.hs | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/test/functional/Format.hs b/test/functional/Format.hs index 539f11358b..75968373b7 100644 --- a/test/functional/Format.hs +++ b/test/functional/Format.hs @@ -64,15 +64,15 @@ providerTests = testGroup "formatting provider" [ documentContents doc >>= liftIO . (@?= formattedFloskell) , testCase "can change on the fly" $ runSession hlsCommand fullCaps "test/testdata/format" $ do - formattedBrittany <- liftIO $ T.readFile "test/testdata/format/Format.ormolu.formatted.hs" + formattedOrmolu <- liftIO $ T.readFile "test/testdata/format/Format.ormolu.formatted.hs" formattedFloskell <- liftIO $ T.readFile "test/testdata/format/Format.floskell.formatted.hs" - formattedBrittanyPostFloskell <- liftIO $ T.readFile "test/testdata/format/Format.ormolu_post_floskell.formatted.hs" + formattedOrmoluPostFloskell <- liftIO $ T.readFile "test/testdata/format/Format.ormolu_post_floskell.formatted.hs" doc <- openDoc "Format.hs" "haskell" sendNotification SWorkspaceDidChangeConfiguration (DidChangeConfigurationParams (formatLspConfig "ormolu")) formatDoc doc (FormattingOptions 2 True Nothing Nothing Nothing) - documentContents doc >>= liftIO . (@?= formattedBrittany) + documentContents doc >>= liftIO . (@?= formattedOrmolu) sendNotification SWorkspaceDidChangeConfiguration (DidChangeConfigurationParams (formatLspConfig "floskell")) formatDoc doc (FormattingOptions 2 True Nothing Nothing Nothing) @@ -80,16 +80,16 @@ providerTests = testGroup "formatting provider" [ sendNotification SWorkspaceDidChangeConfiguration (DidChangeConfigurationParams (formatLspConfig "ormolu")) formatDoc doc (FormattingOptions 2 True Nothing Nothing Nothing) - documentContents doc >>= liftIO . (@?= formattedBrittanyPostFloskell) + documentContents doc >>= liftIO . (@?= formattedOrmoluPostFloskell) , testCase "supports both new and old configuration sections" $ runSession hlsCommand fullCaps "test/testdata/format" $ do - formattedBrittany <- liftIO $ T.readFile "test/testdata/format/Format.ormolu.formatted.hs" + formattedOrmolu <- liftIO $ T.readFile "test/testdata/format/Format.ormolu.formatted.hs" formattedFloskell <- liftIO $ T.readFile "test/testdata/format/Format.floskell.formatted.hs" doc <- openDoc "Format.hs" "haskell" sendNotification SWorkspaceDidChangeConfiguration (DidChangeConfigurationParams (formatLspConfigOld "ormolu")) formatDoc doc (FormattingOptions 2 True Nothing Nothing Nothing) - documentContents doc >>= liftIO . (@?= formattedBrittany) + documentContents doc >>= liftIO . (@?= formattedOrmolu) sendNotification SWorkspaceDidChangeConfiguration (DidChangeConfigurationParams (formatLspConfigOld "floskell")) formatDoc doc (FormattingOptions 2 True Nothing Nothing Nothing)