X-Git-Url: https://git.lukelau.me/?p=lsp-test.git;a=blobdiff_plain;f=src%2FLanguage%2FLSP%2FTest%2FParsing.hs;fp=src%2FLanguage%2FHaskell%2FLSP%2FTest%2FParsing.hs;h=26625b555111bbf554643baf3ad18690a632f17b;hp=92ab99faea5898c646f888f25aaed22bf50968df;hb=cf9e06e2eb79b113ff861866690f14166d1fa4e7;hpb=84e2707604b3a64c00062104fa40e2ea76040155

diff --git a/src/Language/Haskell/LSP/Test/Parsing.hs b/src/Language/LSP/Test/Parsing.hs
similarity index 96%
rename from src/Language/Haskell/LSP/Test/Parsing.hs
rename to src/Language/LSP/Test/Parsing.hs
index 92ab99f..26625b5 100644
--- a/src/Language/Haskell/LSP/Test/Parsing.hs
+++ b/src/Language/LSP/Test/Parsing.hs
@@ -10,7 +10,7 @@
 {-# LANGUAGE RankNTypes #-}
 {-# LANGUAGE OverloadedStrings #-}
 
-module Language.Haskell.LSP.Test.Parsing
+module Language.LSP.Test.Parsing
   ( -- $receiving
     satisfy
   , satisfyMaybe
@@ -35,8 +35,8 @@ import Data.Conduit.Parser hiding (named)
 import qualified Data.Conduit.Parser (named)
 import qualified Data.Text as T
 import Data.Typeable
-import Language.Haskell.LSP.Types
-import Language.Haskell.LSP.Test.Session
+import Language.LSP.Types
+import Language.LSP.Test.Session
 
 -- $receiving
 -- To receive a message, specify the method of the message to expect:
@@ -46,7 +46,7 @@ import Language.Haskell.LSP.Test.Session
 -- msg2 <- message STextDocumentHover
 -- @
 --
--- 'Language.Haskell.LSP.Test.Session' is actually just a parser
+-- 'Language.LSP.Test.Session' is actually just a parser
 -- that operates on messages under the hood. This means that you
 -- can create and combine parsers to match speicifc sequences of
 -- messages that you expect.
@@ -198,7 +198,7 @@ loggingNotification = named "Logging notification" $ satisfy shouldSkip
     shouldSkip (FromServerMess SWindowShowMessageRequest _) = True
     shouldSkip _ = False
 
--- | Matches a 'Language.Haskell.LSP.Test.PublishDiagnosticsNotification'
+-- | Matches a 'Language.LSP.Test.PublishDiagnosticsNotification'
 -- (textDocument/publishDiagnostics) notification.
 publishDiagnosticsNotification :: Session PublishDiagnosticsNotification
 publishDiagnosticsNotification = named "Publish diagnostics notification" $