reexport stuff from BuilderQQ

make-pages/BuilderQQ.hs

@@ -1,5 +1,5 @@
 {-# LANGUAGE TemplateHaskell #-}
-module BuilderQQ (b) where
+module BuilderQQ (b, Builder, toLazyText, fromText, fromString, fromChar) where
 
 import Data.Char (isLower, isSpace, isDigit, isAlphaNum)
 import Language.Haskell.TH
@@ -176,3 +176,6 @@ pattern c :. t <- (Text.uncons -> Just (c, t))
   where c :. t = Text.cons c t
 
 {-# COMPLETE NilT, (:.) :: Text #-}
+
+fromChar :: Char -> Builder
+fromChar = singleton

make-pages/Depend.hs

@@ -9,7 +9,6 @@ import Info hiding (Text)
 
 import Data.Maybe (fromMaybe)
 import Data.Text.Lazy (Text)
-import Data.Text.Lazy.Builder (Builder, toLazyText, fromString)
 import System.FilePath
 
 

make-pages/GalleryPage.hs

@@ -4,7 +4,6 @@ import Control.Exception
 import Data.Function (on, (&))
 import Data.List (sortBy, groupBy)
 import qualified Data.Text.Lazy as Lazy
-import Data.Text.Lazy.Builder (Builder, toLazyText)
 import System.FilePath ((</>), takeDirectory)
 
 import BuilderQQ

make-pages/IndexPage.hs

@@ -1,7 +1,6 @@
 module IndexPage (make) where
 
 import qualified Data.Text.Lazy as Lazy
-import Data.Text.Lazy.Builder (Builder, toLazyText)
 
 import BuilderQQ
 import Info

make-pages/SinglePage.hs

@@ -8,7 +8,6 @@ import Records ()
 import Control.Exception
 import qualified Data.Text as Strict
 import qualified Data.Text.Lazy as Lazy
-import Data.Text.Lazy.Builder (Builder, toLazyText)
 import Data.Time (formatTime, defaultTimeLocale)
 import Data.Maybe (fromMaybe)
 import qualified Data.Char as Char