Skip to content

Commit 7c1c2e2

Browse files
committed
- LSP import for tests
1 parent 6ab7818 commit 7c1c2e2

File tree

1 file changed

+15
-17
lines changed

1 file changed

+15
-17
lines changed

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

Lines changed: 15 additions & 17 deletions
Original file line numberDiff line numberDiff line change
@@ -6,8 +6,6 @@ module Outline (
66
) where
77

88
import qualified Ide.Plugin.Cabal.Outline as Outline
9-
import Language.LSP.Protocol.Types ()
10-
import qualified Language.LSP.Protocol.Types as LSP
119
import Test.Hls
1210
import Utils
1311

@@ -41,36 +39,36 @@ outlineTests =
4139
]
4240
where
4341
fieldDocumentSymbol :: DocumentSymbol
44-
fieldDocumentSymbol = (Outline.defDocumentSymbol (LSP.Range {_start = LSP.Position {_line = 0, _character = 0},
45-
_end = LSP.Position {_line = 0, _character = 8}}))
42+
fieldDocumentSymbol = (Outline.defDocumentSymbol (Range {_start = Position {_line = 0, _character = 0},
43+
_end = Position {_line = 0, _character = 8}}))
4644
{ _name = "homepage",
47-
_kind = LSP.SymbolKind_Field,
45+
_kind = SymbolKind_Field,
4846
_children = Nothing
4947
}
5048
fieldLineDocumentSymbol :: DocumentSymbol
51-
fieldLineDocumentSymbol = (Outline.defDocumentSymbol (LSP.Range {_start = LSP.Position {_line = 0, _character = 0},
52-
_end = LSP.Position {_line = 0, _character = 13}}))
49+
fieldLineDocumentSymbol = (Outline.defDocumentSymbol (Range {_start = Position {_line = 0, _character = 0},
50+
_end = Position {_line = 0, _character = 13}}))
5351
{ _name = "cabal-version",
54-
_kind = LSP.SymbolKind_Field,
52+
_kind = SymbolKind_Field,
5553
_children = Nothing -- the values of fieldLine are removed from the outline
5654
}
5755
sectionDocumentSymbol :: DocumentSymbol
58-
sectionDocumentSymbol = (Outline.defDocumentSymbol (LSP.Range {_start = LSP.Position {_line = 0, _character = 2},
59-
_end = LSP.Position {_line = 0, _character = 15}}))
56+
sectionDocumentSymbol = (Outline.defDocumentSymbol (Range {_start = Position {_line = 0, _character = 2},
57+
_end = Position {_line = 0, _character = 15}}))
6058
{ _name = "build-depends",
61-
_kind = LSP.SymbolKind_Field,
59+
_kind = SymbolKind_Field,
6260
_children = Nothing -- the values of fieldLine are removed from the outline
6361
}
6462
sectionArgDocumentSymbol :: DocumentSymbol
65-
sectionArgDocumentSymbol = (Outline.defDocumentSymbol (LSP.Range {_start = LSP.Position {_line = 0, _character = 2},
66-
_end = LSP.Position {_line = 0, _character = 19}}))
63+
sectionArgDocumentSymbol = (Outline.defDocumentSymbol (Range {_start = Position {_line = 0, _character = 2},
64+
_end = Position {_line = 0, _character = 19}}))
6765
{ _name = "if os ( windows )",
68-
_kind = LSP.SymbolKind_Object,
66+
_kind = SymbolKind_Object,
6967
_children = Just $ [sectionArgChildrenDocumentSymbol] }
7068
sectionArgChildrenDocumentSymbol :: DocumentSymbol
71-
sectionArgChildrenDocumentSymbol = (Outline.defDocumentSymbol (LSP.Range {_start = LSP.Position {_line = 1, _character = 4},
72-
_end = LSP.Position {_line = 1, _character = 17}}))
69+
sectionArgChildrenDocumentSymbol = (Outline.defDocumentSymbol (Range {_start = Position {_line = 1, _character = 4},
70+
_end = Position {_line = 1, _character = 17}}))
7371
{ _name = "build-depends",
74-
_kind = LSP.SymbolKind_Field,
72+
_kind = SymbolKind_Field,
7573
_children = Nothing
7674
}

0 commit comments

Comments
 (0)