diff options
author | Vincent Ambo <tazjin@google.com> | 2019-07-04T15·05+0100 |
---|---|---|
committer | Vincent Ambo <tazjin@google.com> | 2019-07-04T15·05+0100 |
commit | 407a65b9ba7e0ffb89fc1a5322366906efec721c (patch) | |
tree | b11c9c6373e86b78714410700c134508b37f11b5 /services/tazblog/src/Blog.hs | |
parent | d26cf3d806e33ed678878733e2c40bb09e9b15c9 (diff) |
refactor(tazblog): Move required GHC extensions into source r/25
Necessary because Cabal is going away.
Diffstat (limited to 'services/tazblog/src/Blog.hs')
-rw-r--r-- | services/tazblog/src/Blog.hs | 33 |
1 files changed, 22 insertions, 11 deletions
diff --git a/services/tazblog/src/Blog.hs b/services/tazblog/src/Blog.hs index f35e3d90801f..7e0f428899ac 100644 --- a/services/tazblog/src/Blog.hs +++ b/services/tazblog/src/Blog.hs @@ -1,16 +1,27 @@ +{-# LANGUAGE DeriveDataTypeable #-} +{-# LANGUAGE FlexibleContexts #-} +{-# LANGUAGE GeneralizedNewtypeDeriving #-} +{-# LANGUAGE MultiParamTypeClasses #-} +{-# LANGUAGE OverloadedStrings #-} +{-# LANGUAGE QuasiQuotes #-} +{-# LANGUAGE RecordWildCards #-} +{-# LANGUAGE ScopedTypeVariables #-} +{-# LANGUAGE TemplateHaskell #-} +{-# LANGUAGE TypeFamilies #-} + module Blog where -import BlogDB -import Data.Maybe (fromJust) -import Data.Text (Text, append, empty, pack) -import Data.Text.Lazy (fromStrict) -import Data.Time -import Locales -import Text.Blaze.Html (preEscapedToHtml) -import Text.Hamlet -import Text.Markdown - -import qualified Data.Text as T +import BlogDB +import Data.Maybe (fromJust) +import Data.Text (Text, append, empty, pack) +import Data.Text.Lazy (fromStrict) +import Data.Time +import Locales +import Text.Blaze.Html (preEscapedToHtml) +import Text.Hamlet +import Text.Markdown + +import qualified Data.Text as T replace :: Eq a => a -> a -> [a] -> [a] replace x y = map (\z -> if z == x then y else z) |