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

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)
+```