schema ghc98

Author: VenInf

plugins/hls-cabal-plugin/src/Ide/Plugin/Cabal/Outline.hs

@@ -3,7 +3,6 @@
 {-# LANGUAGE DuplicateRecordFields #-}
 {-# LANGUAGE GADTs                 #-}
 {-# LANGUAGE OverloadedStrings     #-}
-{-# LANGUAGE RecordWildCards       #-}
 {-# LANGUAGE ViewPatterns          #-}
 
 module Ide.Plugin.Cabal.Outline where
@@ -92,13 +91,13 @@ addNameLengthToLSPRange (LSP.Range pos1 (LSP.Position line char)) name =
     (LSP.Position line (char + fromIntegral (T.length name)))
 
 defDocumentSymbol :: LSP.Range -> DocumentSymbol
-defDocumentSymbol range = DocumentSymbol {..}
-  where
-    _detail = Nothing
-    _deprecated = Nothing
-    _name = ""
-    _kind = LSP.SymbolKind_File
-    _range = range
-    _selectionRange = range
-    _children = Nothing
-    _tags = Nothing
+defDocumentSymbol range = DocumentSymbol
+  { _detail = Nothing
+  , _deprecated = Nothing
+  , _name = ""
+  , _kind = LSP.SymbolKind_File
+  , _range = range
+  , _selectionRange = range
+  , _children = Nothing
+  , _tags = Nothing
+  }

test/testdata/schema/ghc98/default-config.golden.json

@@ -11,7 +11,8 @@
         "cabal": {
             "codeActionsOn": true,
             "completionOn": true,
-            "diagnosticsOn": true
+            "diagnosticsOn": true,
+            "symbolsOn": true
         },
         "cabal-fmt": {
             "config": {

test/testdata/schema/ghc98/vscode-extension-schema.golden.json

@@ -35,6 +35,12 @@
         "scope": "resource",
         "type": "boolean"
     },
+    "haskell.plugin.cabal.symbolsOn": {
+        "default": true,
+        "description": "Enables cabal symbols",
+        "scope": "resource",
+        "type": "boolean"
+    },
     "haskell.plugin.callHierarchy.globalOn": {
         "default": true,
         "description": "Enables callHierarchy plugin",