diff --git a/.gitignore b/.gitignore index 735d79e36..eb1137df6 100644 --- a/.gitignore +++ b/.gitignore @@ -13,3 +13,5 @@ *.swo *.DS_Store .hspec-failures +/haskell-lsp-types/dist/ +/haskell-lsp-types/dist-newstyle/ diff --git a/haskell-lsp-types/src/Language/Haskell/LSP/TH/ClientCapabilities.hs b/haskell-lsp-types/src/Language/Haskell/LSP/TH/ClientCapabilities.hs index b965f2060..778d091df 100644 --- a/haskell-lsp-types/src/Language/Haskell/LSP/TH/ClientCapabilities.hs +++ b/haskell-lsp-types/src/Language/Haskell/LSP/TH/ClientCapabilities.hs @@ -13,6 +13,8 @@ import Language.Haskell.LSP.TH.MarkupContent import Language.Haskell.LSP.TH.Symbol import Data.Default +{-# ANN module "HLint: ignore Use newtype instead of data" #-} + -- --------------------------------------------------------------------- {- New in 3.0 @@ -731,6 +733,7 @@ data DocumentSymbolClientCapabilities = _dynamicRegistration :: Maybe Bool -- | Specific capabilities for the `SymbolKind`. , _symbolKind :: Maybe DocumentSymbolKindClientCapabilities + , _hierarchicalDocumentSymbolSupport :: Maybe Bool } deriving (Show, Read, Eq) $(deriveJSON lspOptions ''DocumentSymbolClientCapabilities) diff --git a/src/Language/Haskell/LSP/Types/Capabilities.hs b/src/Language/Haskell/LSP/Types/Capabilities.hs index f885ec95f..85e954825 100644 --- a/src/Language/Haskell/LSP/Types/Capabilities.hs +++ b/src/Language/Haskell/LSP/Types/Capabilities.hs @@ -188,6 +188,7 @@ capsForVersion (LSPVersion maj min) = ClientCapabilities (Just w) (Just td) Noth documentSymbol = DocumentSymbolClientCapabilities dynamicReg (since 3 4 documentSymbolKind) + (since 3 10 True) documentSymbolKind = DocumentSymbolKindClientCapabilities