X-Git-Url: http://git.cielonegro.org/gitweb.cgi?p=Lucu.git;a=blobdiff_plain;f=Network%2FHTTP%2FLucu%2FDefaultPage.hs;h=988329d28757d62a600ede2ac7aa66df1a499a61;hp=f5cc4764366c62d65edbc165bfb8a0b7f73b5283;hb=b340a77fa7bd051dd13a41d0a5b1ad30220bc6b6;hpb=62f7c13cae3dd68e639b279a3c9a9a742a559927

diff --git a/Network/HTTP/Lucu/DefaultPage.hs b/Network/HTTP/Lucu/DefaultPage.hs
index f5cc476..988329d 100644
--- a/Network/HTTP/Lucu/DefaultPage.hs
+++ b/Network/HTTP/Lucu/DefaultPage.hs
@@ -1,7 +1,8 @@
+-- #hide, prune
 module Network.HTTP.Lucu.DefaultPage
-    ( getDefaultPage   -- Config -> Maybe Request -> Response -> String
-    , writeDefaultPage -- Interaction -> STM ()
-    , mkDefaultPage    --  (ArrowXml a) => Config -> StatusCode -> a b XmlTree -> a b XmlTree
+    ( getDefaultPage
+    , writeDefaultPage
+    , mkDefaultPage
     )
     where