Outline test Ambiguous occurrence change

Author: VenInf

plugins/hls-cabal-plugin/test/Outline.hs

@@ -6,6 +6,7 @@ module Outline (
 ) where
 
 import qualified Ide.Plugin.Cabal.Outline    as Outline
+import           Language.LSP.Protocol.Types ()
 import qualified Language.LSP.Protocol.Types as LSP
 import           Test.Hls
 import           Utils
@@ -41,30 +42,30 @@ outlineTests =
   where
     fieldDocumentSymbol = (Outline.defDocumentSymbol (LSP.Range {_start = LSP.Position {_line = 0, _character = 0},
                                                                  _end = LSP.Position {_line = 0, _character = 8}}))
-                                    { LSP._name = "homepage",
-                                      LSP._kind = LSP.SymbolKind_Field,
-                                      LSP._children = Nothing
+                                    { _name = "homepage",
+                                      _kind = LSP.SymbolKind_Field,
+                                      _children = Nothing
                                     }
     fieldLineDocumentSymbol = (Outline.defDocumentSymbol (LSP.Range {_start = LSP.Position {_line = 0, _character = 0},
                                                                      _end = LSP.Position {_line = 0, _character = 13}}))
-                                    { LSP._name = "cabal-version",
-                                      LSP._kind = LSP.SymbolKind_Field,
-                                      LSP._children = Nothing -- the values of fieldLine are removed from the outline
+                                    { _name = "cabal-version",
+                                      _kind = LSP.SymbolKind_Field,
+                                      _children = Nothing -- the values of fieldLine are removed from the outline
                                     }
     sectionDocumentSymbol = (Outline.defDocumentSymbol (LSP.Range {_start = LSP.Position {_line = 0, _character = 2},
                                                                      _end = LSP.Position {_line = 0, _character = 15}}))
-                                    { LSP._name = "build-depends",
-                                      LSP._kind = LSP.SymbolKind_Field,
-                                      LSP._children = Nothing -- the values of fieldLine are removed from the outline
+                                    { _name = "build-depends",
+                                      _kind = LSP.SymbolKind_Field,
+                                      _children = Nothing -- the values of fieldLine are removed from the outline
                                     }
     sectionArgDocumentSymbol = (Outline.defDocumentSymbol (LSP.Range {_start = LSP.Position {_line = 0, _character = 2},
                                                                      _end = LSP.Position {_line = 0, _character = 19}}))
-                                    { LSP._name = "if os ( windows )",
-                                      LSP._kind = LSP.SymbolKind_Object,
-                                      LSP._children = Just $ [sectionArgChildrenDocumentSymbol]                                    }
+                                    { _name = "if os ( windows )",
+                                      _kind = LSP.SymbolKind_Object,
+                                      _children = Just $ [sectionArgChildrenDocumentSymbol]                                    }
     sectionArgChildrenDocumentSymbol = (Outline.defDocumentSymbol (LSP.Range {_start = LSP.Position {_line = 1, _character = 4},
                                                                      _end = LSP.Position {_line = 1, _character = 17}}))
-                                    { LSP._name = "build-depends",
-                                      LSP._kind = LSP.SymbolKind_Field,
-                                      LSP._children = Nothing
+                                    { _name = "build-depends",
+                                      _kind = LSP.SymbolKind_Field,
+                                      _children = Nothing
                                     }