tA/p7
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Minor CSS change, fixed port

Browse Source
This commit is contained in:
Shaun Kerr 2018-06-28 10:12:44 +12:00
parent 6aab9b7f8d
commit 35ad19f499
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
Main.hs
View File

@ -112,6 +112,7 @@ getHomeR = defaultLayout $ do
ul {
text-align: initial;
margin: 10px;
}
.upcomingIn {
@ -207,7 +208,7 @@ getHomeR = defaultLayout $ do
|]
main :: IO ()
main = warp 7280 Chhf
main = warp 80 Chhf
toTS :: (Integer, Int, Int) -> Timestamp
toTS (y,m,d) = Ts (fromIntegral d) (fromIntegral m) y