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