1
0
Fork 0
mirror of https://code.sup39.dev/repos/Wqawg synced 2025-03-20 04:46:22 +09:00

Remove copyright field from settings, copyright is wrong!

This commit is contained in:
fr33domlover 2016-04-19 15:47:26 +00:00
parent 242e04a3ce
commit 5ae09c2ad7
3 changed files with 3 additions and 7 deletions
src/Vervis

View file

@ -75,12 +75,10 @@ data AppSettings = AppSettings
, appSshPort :: Int
-- | Path to the server's SSH private key file
, appSshKeyFile :: FilePath
-- | Copyright text to appear in the footer of the page
, appCopyright :: Text
}
instance FromJSON AppSettings where
parseJSON = withObject "AppSettings" $ \o -> do
parseJSON = withObject "AppSettings" $ \ o -> do
let defaultDev =
#if DEVELOPMENT
True
@ -103,7 +101,6 @@ instance FromJSON AppSettings where
appRepoDir <- o .: "repo-dir"
appSshPort <- o .: "ssh-port"
appSshKeyFile <- o .: "ssh-key-file"
appCopyright <- o .: "copyright"
return AppSettings {..}