web: tweak "embedded files" message

This commit is contained in:
Simon Michael 2012-11-17 01:23:05 +00:00
parent 695ff9a49e
commit 42185474c0

View File

@ -26,7 +26,7 @@ staticSite =
putStrLn ("using web files from: " ++ staticDir ++ "/") >> hFlush stdout
Static.staticDevel staticDir)
else (do
putStrLn "using embedded web files" >> hFlush stdout
putStrLn "using built-in web files" >> hFlush stdout
return $(Static.embed staticDir))
$(publicFiles staticDir)