better ordered typeclasses
This commit is contained in:
parent
5c97fd64db
commit
535d985aa9
@ -23,7 +23,7 @@ docOpenHandler = notificationHandler SMethod_TextDocumentDidOpen updateState
|
|||||||
docChangeHandler :: Handlers DLogLspM
|
docChangeHandler :: Handlers DLogLspM
|
||||||
docChangeHandler = notificationHandler SMethod_TextDocumentDidChange updateState
|
docChangeHandler = notificationHandler SMethod_TextDocumentDidChange updateState
|
||||||
|
|
||||||
updateState :: (HasParams s a1, MonadLsp LSPState m, HasUri a2 Uri, HasTextDocument a1 a2, MonadIO m) => s -> m ()
|
updateState :: (MonadIO m, MonadLsp LSPState m, HasParams s a1, HasTextDocument a1 a2, HasUri a2 Uri) => s -> m ()
|
||||||
updateState req = do
|
updateState req = do
|
||||||
let uri = currentBufferUri req
|
let uri = currentBufferUri req
|
||||||
|
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user