Commit dcf8e94b authored by Nicolas Lenz's avatar Nicolas Lenz ❄️
Browse files

Fix default baseUrl config

parent b5714d71

src/Config.hs

+1 −1
Original line number Diff line number Diff line
@@ -26,7 +26,7 @@ data NavItem = NavItem { 


instance FromJSON Config where

    parseJSON = withObject "Config" $ \v -> Config

        <$> v .:  "baseUrl" .!= "https://example.com"

        <$> v .:?  "baseUrl" .!= "https://example.com"

        <*> v .:? "folderOutput" .!= [reldir|out|]

        <*> v .:? "folderArticle" .!= [reldir|article|]

        <*> v .:? "folderPage" .!= [reldir|page|]