X-Git-Url: http://git.lukelau.me/?p=opengl.git;a=blobdiff_plain;f=README.md;h=0af386e54c3a75c8be2f2af3af767ff6fb2693ce;hp=f866ccfcc30af7ff000583314e73bae5813aaefb;hb=312e6e45078d7bdf759d8f1b222557734c1a9dd0;hpb=1f39d55cc3fb2e840a115c12d7da3935b9529361

diff --git a/README.md b/README.md
index f866ccf..0af386e 100644
--- a/README.md
+++ b/README.md
@@ -7,9 +7,8 @@ runSession "session/root/dir" $ do
   
   skipMany notification
   
-  sendRequest (Proxy :: Proxy DocumentSymbolRequest)
-              TextDocumentDocumentSymbol
-              (DocumentSymbolParams doc)
+  sendRequest TextDocumentDocumentSymbol (DocumentSymbolParams doc)
               
-  RspDocumentSymbols rspSymbols <- response
+  rspSymbols <- response :: DocumentSymbolsResponse
   let (List symbols) = fromJust (rspSymbols ^. result)
+```