diff --git a/test/functional/FunctionalCodeActionsSpec.hs b/test/functional/FunctionalCodeActionsSpec.hs index acca7de77..251141d28 100644 --- a/test/functional/FunctionalCodeActionsSpec.hs +++ b/test/functional/FunctionalCodeActionsSpec.hs @@ -48,7 +48,7 @@ spec = describe "code actions" $ do contents <- getDocumentEdit doc liftIO $ contents `shouldBe` "main = undefined\nfoo x = x\n" - -- noDiagnostics + noDiagnostics -- --------------------------------- @@ -67,7 +67,7 @@ spec = describe "code actions" $ do contents <- skipManyTill publishDiagnosticsNotification $ getDocumentEdit doc liftIO $ contents `shouldBe` "main = undefined\nfoo x = x\n" - -- noDiagnostics + noDiagnostics -- --------------------------------- @@ -96,7 +96,7 @@ spec = describe "code actions" $ do liftIO $ contents `shouldBe` "main = undefined\nfoo x = x\n" sendNotification TextDocumentDidSave (DidSaveTextDocumentParams doc) - -- noDiagnostics + noDiagnostics -- ----------------------------------- diff --git a/test/unit/LiquidSpec.hs b/test/unit/LiquidSpec.hs index 16191fb6a..99118fced 100644 --- a/test/unit/LiquidSpec.hs +++ b/test/unit/LiquidSpec.hs @@ -33,7 +33,7 @@ spec = do Nothing -> expectationFailure "liquid haskell exe is NOT in $PATH" Just exe -> do version <- readProcess exe ["--numeric-version"] "" - version `shouldSatisfy` isPrefixOf "0.8.6.2" + version `shouldSatisfy` ("0.8.6" `isPrefixOf`) -- ---------------------------------