shikensu haskell
v0.4.1
シーケンス
Séquence
Exécutez une séquence de fonctions sur des représentations en mémoire de fichiers.
Créez facilement des sites Web statiques , sans vous conformer à une structure spécifique.
import Shikensu
import Shikensu.Contrib ( clone , copyPropsToMetadata , permalink , renameExt , renderContent )
import Shikensu.Contrib.IO ( read , write )
import Data.ByteString ( ByteString )
import Flow
import Prelude hiding ( read )
import qualified Data.Text.Encoding as Text ( decodeUtf8 , encodeUtf8 )
main :: IO Dictionary
main =
-- This IO operation will read the files matching the glob pattern `src/**/*.md`,
-- transform them (see the `flow` function) and then write them to the `build` directory.
dictionary_io
dictionary_io :: IO Dictionary
dictionary_io =
Shikensu. listRelative [ " src/**/*.md " ] " ./ "
>>= read
>>= flow
>>= write " ./build "
flow :: Dictionary -> IO Dictionary
flow =
renameExt " .md " " .html "
.> permalink " index "
.> clone " index.html " " 200.html "
.> copyPropsToMetadata
.> renderContent markdownRenderer
.> return
markdownRenderer :: Definition -> Maybe ByteString
markdownRenderer def =
content def
|> fmap Text. decodeUtf8
|> fmap Markdown. render
|> fmap Text. encodeUtf8
Ceci répertorie tous les fichiers markdown dans le répertoire ./src
puis fait ce qui suit dans cet ordre exact :
.html
.%matched_path/%file_basename/index.%file_extension
.index.html
.content
de chaque définition (dans ce cas, nous rendons le markdown)../build
.Parce que cela me permet de définir facilement un workflow pour construire un site web statique, et plus précisément :