Remove copyright field from settings, copyright is wrong!
This commit is contained in:
parent
242e04a3ce
commit
5ae09c2ad7
3 changed files with 3 additions and 7 deletions
|
@ -41,4 +41,3 @@ database:
|
||||||
repo-dir: repos
|
repo-dir: repos
|
||||||
ssh-port: 5022
|
ssh-port: 5022
|
||||||
ssh-key-file: config/ssh-host-key
|
ssh-key-file: config/ssh-host-key
|
||||||
copyright: Insert your statement against copyright here
|
|
||||||
|
|
|
@ -75,12 +75,10 @@ data AppSettings = AppSettings
|
||||||
, appSshPort :: Int
|
, appSshPort :: Int
|
||||||
-- | Path to the server's SSH private key file
|
-- | Path to the server's SSH private key file
|
||||||
, appSshKeyFile :: FilePath
|
, appSshKeyFile :: FilePath
|
||||||
-- | Copyright text to appear in the footer of the page
|
|
||||||
, appCopyright :: Text
|
|
||||||
}
|
}
|
||||||
|
|
||||||
instance FromJSON AppSettings where
|
instance FromJSON AppSettings where
|
||||||
parseJSON = withObject "AppSettings" $ \o -> do
|
parseJSON = withObject "AppSettings" $ \ o -> do
|
||||||
let defaultDev =
|
let defaultDev =
|
||||||
#if DEVELOPMENT
|
#if DEVELOPMENT
|
||||||
True
|
True
|
||||||
|
@ -103,7 +101,6 @@ instance FromJSON AppSettings where
|
||||||
appRepoDir <- o .: "repo-dir"
|
appRepoDir <- o .: "repo-dir"
|
||||||
appSshPort <- o .: "ssh-port"
|
appSshPort <- o .: "ssh-port"
|
||||||
appSshKeyFile <- o .: "ssh-key-file"
|
appSshKeyFile <- o .: "ssh-key-file"
|
||||||
appCopyright <- o .: "copyright"
|
|
||||||
|
|
||||||
return AppSettings {..}
|
return AppSettings {..}
|
||||||
|
|
||||||
|
|
|
@ -40,5 +40,5 @@ $# document.documentElement.className = document.documentElement.className.re
|
||||||
<header>
|
<header>
|
||||||
<div id="main" role="main">
|
<div id="main" role="main">
|
||||||
^{pageBody pc}
|
^{pageBody pc}
|
||||||
<footer>
|
$# <footer>
|
||||||
#{appCopyright $ appSettings master}
|
$# #{appCopyright $ appSettings master}
|
||||||
|
|
Loading…
Reference in a new issue