From d70d885133173b9cf89cf6b3e34c8732cb65ab61 Mon Sep 17 00:00:00 2001
From: PHO <pho@cielonegro.org>
Date: Tue, 1 Nov 2011 02:14:11 +0900
Subject: [PATCH] comment

Ditz-issue: 8959dadc07db1bd363283dee401073f6e48dc7fa
---
 Network/HTTP/Lucu/Interaction.hs | 1 -
 1 file changed, 1 deletion(-)

diff --git a/Network/HTTP/Lucu/Interaction.hs b/Network/HTTP/Lucu/Interaction.hs
index 3be8928..f1e7ab3 100644
--- a/Network/HTTP/Lucu/Interaction.hs
+++ b/Network/HTTP/Lucu/Interaction.hs
@@ -109,7 +109,6 @@ mkSemanticallyInvalidInteraction ∷ Config
                                  → IO SemanticallyInvalidInteraction
 mkSemanticallyInvalidInteraction config@(Config {..}) (AugmentedRequest {..})
     = do date ← getCurrentDate
-         -- FIXME: DRY
          let res  = setHeader "Server"       cnfServerSoftware      $
                     setHeader "Date"         date                   $
                     setHeader "Content-Type" defaultPageContentType $
-- 
2.40.0