more sensible error message
This commit is contained in:
parent
6b2ae759ab
commit
6f37a60f3b
@ -20,7 +20,7 @@ tokenHandler = requestHandler SMethod_TextDocumentSemanticTokensFull $ \req resp
|
|||||||
responder $
|
responder $
|
||||||
case M.lookup (currentBufferUri req) p of
|
case M.lookup (currentBufferUri req) p of
|
||||||
Nothing ->
|
Nothing ->
|
||||||
Left $ TResponseError (InL LSPErrorCodes_RequestFailed) "Doc not bundle" Nothing
|
Left $ TResponseError (InL LSPErrorCodes_RequestFailed) "Doc not found in bundle" Nothing
|
||||||
Just (Left _) ->
|
Just (Left _) ->
|
||||||
Left $ TResponseError (InL LSPErrorCodes_RequestFailed) "Failed to parse" Nothing
|
Left $ TResponseError (InL LSPErrorCodes_RequestFailed) "Failed to parse" Nothing
|
||||||
Just (Right prog) ->
|
Just (Right prog) ->
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user