From 7eed467cbc7ed48c1b88766f0c7eb6bb77be09ef Mon Sep 17 00:00:00 2001
From: PHO <pho@cielonegro.org>
Date: Tue, 1 Nov 2011 23:46:36 +0900
Subject: [PATCH] haddock comments

---
 Network/HTTP/Lucu.hs        | 2 +-
 Network/HTTP/Lucu/Parser.hs | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/Network/HTTP/Lucu.hs b/Network/HTTP/Lucu.hs
index 901ae00..d45beaf 100644
--- a/Network/HTTP/Lucu.hs
+++ b/Network/HTTP/Lucu.hs
@@ -5,7 +5,7 @@
 --   [/Affinity for RESTafarians/] Lucu is specifically designed to be
 --   suitable for RESTful applications.
 --
---   [/Full support of HTTP\/1.1/] Lucu supports request pipelining,
+--   [/Full support of HTTP/\//1.1/] Lucu supports request pipelining,
 --   chunked I\/O, ETag comparison and \"100 Continue\".
 --
 --   [/SSL connections/] Lucu can handle HTTP connections over Secure
diff --git a/Network/HTTP/Lucu/Parser.hs b/Network/HTTP/Lucu/Parser.hs
index b31d4b8..ac1bf02 100644
--- a/Network/HTTP/Lucu/Parser.hs
+++ b/Network/HTTP/Lucu/Parser.hs
@@ -23,7 +23,7 @@ atMost n v = ( (:) <$> v ⊛ atMost (n-1) v )
              <|>
              pure []
 
--- |@'finishOff' p@ is equivalent to @p '>>=' \a -> endOfInput '>>'
+-- |@'finishOff' p@ is equivalent to @p '>>=' \\a -> 'endOfInput' '>>'
 -- 'return' a@.
 finishOff ∷ Parser α → Parser α
 {-# INLINE finishOff #-}
-- 
2.40.0