diff options
| author | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2010-03-05 12:22:09 +0100 |
|---|---|---|
| committer | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2010-03-05 12:22:09 +0100 |
| commit | 664111c00178039c5a68f62da7612fb04b25927c (patch) | |
| tree | c74fbca0bdec6ad5c324884b826e82b044f4b3d0 /src/Text/Hakyll/Internal | |
| parent | cd51ba5789243d47b1bb0701c563eef8be6e1d8e (diff) | |
| download | hakyll-664111c00178039c5a68f62da7612fb04b25927c.tar.gz | |
Simplified css and static code.
Diffstat (limited to 'src/Text/Hakyll/Internal')
| -rw-r--r-- | src/Text/Hakyll/Internal/Render.hs | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/src/Text/Hakyll/Internal/Render.hs b/src/Text/Hakyll/Internal/Render.hs index 739db7a..5432f4d 100644 --- a/src/Text/Hakyll/Internal/Render.hs +++ b/src/Text/Hakyll/Internal/Render.hs @@ -10,7 +10,6 @@ module Text.Hakyll.Internal.Render import qualified Data.Map as M import Control.Monad.Reader (liftIO) import Data.Maybe (fromMaybe) -import System.IO (hPutStrLn, stderr) import Text.Hakyll.Context (Context, ContextManipulation) import Text.Hakyll.File @@ -42,6 +41,4 @@ writePage = createRenderAction $ \initialContext -> do destination <- toDestination url makeDirectories destination -- Substitute $root here, just before writing. - liftIO $ do - writeFile destination $ finalSubstitute (fromString body) context - hPutStrLn stderr $ "Writing " ++ destination + liftIO $ writeFile destination $ finalSubstitute (fromString body) context |