getAddrInfo: invalid haddock

[vvv]

Example in the haddock documentation for `getAddrInfo' function is rendered incorrectly.

The patch:

--- Network/Socket.hsc.orig	2009-11-30 15:08:57.869477201 +0200
+++ Network/Socket.hsc	2009-11-30 15:08:28.328452505 +0200
@@ -1972,9 +1972,10 @@
 -- to make partial application easier.
 --
 -- Example:
+--
 -- @
 --   let hints = defaultHints { addrFlags = [AI_ADDRCONFIG, AI_CANONNAME] }
---   addrs <- getAddrInfo (Just hints) (Just "www.haskell.org") (Just "http")
+--   addrs <- getAddrInfo (Just hints) (Just \"www.haskell.org\") (Just \"http\")
 --   let addr = head addrs
 --   sock <- socket (addrFamily addr) (addrSocketType addr) (addrProtocol addr)
 --   connect sock (addrAddress addr)