hls-haddock-comments-plugin 2.1.0.0 → 2.2.0.0
raw patch · 2 files changed
+6/−6 lines, 2 filesdep ~ghcidedep ~hls-plugin-apidep ~hls-test-utils
Dependency ranges changed: ghcide, hls-plugin-api, hls-test-utils
Files
- hls-haddock-comments-plugin.cabal +4/−4
- test/Main.hs +2/−2
hls-haddock-comments-plugin.cabal view
@@ -1,6 +1,6 @@ cabal-version: 2.4 name: hls-haddock-comments-plugin-version: 2.1.0.0+version: 2.2.0.0 synopsis: Haddock comments plugin for Haskell Language Server description: Please see the README on GitHub at <https://github.com/haskell/haskell-language-server>@@ -40,8 +40,8 @@ , containers , ghc , ghc-exactprint < 1- , ghcide == 2.1.0.0- , hls-plugin-api == 2.1.0.0+ , ghcide == 2.2.0.0+ , hls-plugin-api == 2.2.0.0 , hls-refactor-plugin , lsp-types , text@@ -68,5 +68,5 @@ , base , filepath , hls-haddock-comments-plugin- , hls-test-utils == 2.1.0.0+ , hls-test-utils == 2.2.0.0 , text
test/Main.hs view
@@ -39,7 +39,7 @@ goldenWithHaddockComments :: FilePath -> GenCommentsType -> UInt -> UInt -> TestTree goldenWithHaddockComments fp (toTitle -> expectedTitle) l c =- goldenWithHaskellDoc haddockCommentsPlugin (fp <> " (golden)") testDataDir fp "expected" "hs" $ \doc -> do+ goldenWithHaskellDoc def haddockCommentsPlugin (fp <> " (golden)") testDataDir fp "expected" "hs" $ \doc -> do actions <- getCodeActions doc (Range (Position l c) (Position l $ succ c)) case find ((== Just expectedTitle) . caTitle) actions of Just (InR x) -> executeCodeAction x@@ -47,7 +47,7 @@ expectedNothing :: FilePath -> GenCommentsType -> UInt -> UInt -> TestTree expectedNothing fp (toTitle -> expectedTitle) l c = testCase fp $- runSessionWithServer haddockCommentsPlugin testDataDir $ do+ runSessionWithServer def haddockCommentsPlugin testDataDir $ do doc <- openDoc (fp <.> "hs") "haskell" titles <- mapMaybe caTitle <$> getCodeActions doc (Range (Position l c) (Position l $ succ c)) liftIO $ expectedTitle `notElem` titles @? "Unexpected CodeAction"