Skip to content

Commit

Permalink
Additional entry points for baking
Browse files Browse the repository at this point in the history
  • Loading branch information
tdammers committed Jun 1, 2017
1 parent 3422ab8 commit fd06d16
Showing 1 changed file with 8 additions and 1 deletion.
9 changes: 8 additions & 1 deletion src/Web/Sprinkles/Bake.hs
Original file line number Diff line number Diff line change
Expand Up @@ -61,7 +61,14 @@ bakeProject destDir project = do
putStrLn $ "Baking project into " <> pack destDir
createDirectoryIfMissing True destDir
let app = appFromProject project
runBake destDir ["/"] app bakeApp
runBake destDir entryPoints app bakeApp
where
entryPoints =
[ "/"
, "/sitemap.xml"
, "/favicon.ico"
, "/robots.txt"
]

runBake :: FilePath -> [FilePath] -> Application -> Bake a -> IO a
runBake baseDir entryPoints app a =
Expand Down

0 comments on commit fd06d16

Please sign in to comment.