Use time-http

[Rakka.git] / Rakka / Resource / Search.hs

diff --git a/Rakka/Resource/Search.hs b/Rakka/Resource/Search.hs
index 993788ded4b17001ce8cc75047549330ebdce3fe..0543684249401256f00cec51f809e0f7e2dacb09 100644 (file)
--- a/Rakka/Resource/Search.hs
+++ b/Rakka/Resource/Search.hs
@@ -8,9 +8,9 @@ import           Control.Monad.Trans
 import           Data.List
 import           Data.Maybe
 import           Data.Time
+import qualified Data.Time.RFC1123 as RFC1123
 import qualified Data.Time.W3C as W3C
 import           Network.HTTP.Lucu
-import           Network.HTTP.Lucu.RFC1123DateTime
 import           Network.URI hiding (query, fragment)
 import           Rakka.Environment
 import           Rakka.Page
@@ -285,7 +285,7 @@ searchResultToXHTML env
                         >>>
                         arrIO utcToLocalZonedTime
                         >>>
-                        arr formatRFC1123DateTime
+                        arr RFC1123.format
                         >>>
                         mkText
                       )