projects
/
lsp-test.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
compact
(merge:
f557fbe
20750dc
)
Merge pull request #61 from mpickering/wip/persist-virtual-file
author
Luke Lau
<luke_lau@icloud.com>
Sun, 15 Dec 2019 19:14:31 +0000
(19:14 +0000)
committer
GitHub
<noreply@github.com>
Sun, 15 Dec 2019 19:14:31 +0000
(19:14 +0000)
Track changes to haskell-lsp
1
2
src/Language/Haskell/LSP/Test.hs
patch
|
diff1
|
diff2
|
blob
|
history
diff --combined
src/Language/Haskell/LSP/Test.hs
index 4f9cff7cde9de6f2eea6ecc8f876deb3ab88fa37,151eef7f1687fa0a357058f00f92d425a962d437..1a3b2e2ad7098511fc9a27ce67480ac6f2adcd95
---
1
/
src/Language/Haskell/LSP/Test.hs
---
2
/
src/Language/Haskell/LSP/Test.hs
+++ b/
src/Language/Haskell/LSP/Test.hs
@@@
-37,7
-37,6
+37,7
@@@
module Language.Haskell.LSP.Tes
, module Language.Haskell.LSP.Test.Parsing
-- * Utilities
-- | Quick helper functions for common tasks.
+
-- ** Initialization
, initializeResponse
-- ** Documents
@@@
-453,7
-452,7
+453,7
@@@
getVersionedDoc (TextDocumentIdentifie
fs <- vfsMap . vfs <$> get
let ver =
case fs Map.!? toNormalizedUri uri of
- Just
(VirtualFile v _) -> Just v
+ Just
vf -> Just (virtualFileVersion vf)
_ -> Nothing
return (VersionedTextDocumentIdentifier uri ver)