M app/Main.hs => app/Main.hs +4 -3
@@ 10,7 10,7 @@ import Data.Aeson (FromJSON, ToJSON, eitherDecodeFileStrict)
import Hakyll
import Main.Utf8
import System.Exit (exitFailure)
-import Text.Pandoc.Highlighting (Style, zenburn, styleToCss)
+import Text.Pandoc.Highlighting (Style, styleToCss, zenburn)
import Text.Pandoc.Options (WriterOptions (..))
import UnliftIO.Directory (doesDirectoryExist, doesFileExist)
@@ 137,8 137,9 @@ main = do
--------------------------------------------------------------------------------
postCtx :: Context String
postCtx =
- dateField "date" "%B %e, %Y"
- `mappend` defaultContext
+ dateField "isodate" "%Y-%m-%d"
+ <> dateField "date" "%B %e, %Y"
+ <> defaultContext
instance HasCodec FeedConfiguration where
codec =
M website-builder.cabal => website-builder.cabal +4 -2
@@ 14,10 14,12 @@ executable website-builder
, unliftio
, with-utf8
- ghc-options: -threaded -O1 -rtsopts -with-rtsopts=-N +RTS -H2G -A32M -RTS
- -Wall -Werror -Wcompat -fwarn-redundant-constraints
+ ghc-options:
+ -threaded -O1 -rtsopts -with-rtsopts=-N +RTS -H2G -A32M -RTS -Wall
+ -Werror -Wcompat -fwarn-redundant-constraints
-fwarn-incomplete-uni-patterns -fwarn-tabs -fwarn-star-is-type
-fwarn-unused-type-patterns -fwarn-incomplete-record-updates
-fwarn-identities -fprint-potential-instances
-fwarn-unused-packages -fwarn-missing-kind-signatures
+
default-language: Haskell2010