( resSearch
)
where
-
-import qualified Codec.Binary.UTF8.Generic as UTF8
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
import Rakka.Wiki.Engine
import System.FilePath
import Text.HyperEstraier hiding (getText)
-import Text.XML.HXT.Arrow
import Text.XML.HXT.XPath
>>>
arrIO utcToLocalZonedTime
>>>
- arr formatRFC1123DateTime
+ arr RFC1123.format
>>>
mkText
)