WIP: backend auth/chores/households work and frontend styling

This commit is contained in:
2026-07-15 21:20:57 -04:00
parent 08987d7c49
commit b4e47b652f
12 changed files with 1597 additions and 276 deletions
+4 -5
View File
@@ -1,6 +1,6 @@
{-# LANGUAGE OverloadedStrings #-}
{- | Entry point for the Sis chore tracker server.
{- | Entry point for the Sis server.
Starts a Warp HTTP server, serves the JSON API and the SPA frontend.
-}
@@ -55,21 +55,20 @@ main = do
<> Opt.progDesc "Sis — shared household chore tracker"
<> Opt.header "sis-server"
_db <- Database.openDatabase (optDbPath opts)
db <- Database.openDatabase (optDbPath opts)
-- Install a SIGTERM handler so Docker stop works cleanly.
_ <-
Signals.installHandler
Signals.sigTERM
(Signals.Catch (putStrLn "[sis] shutting down"))
Nothing
let waiApp = Sis.app (optStaticDir opts)
let waiApp = Sis.app (optStaticDir opts) db
let settings =
Warp.setPort (optPort opts) $
Warp.setBeforeMainLoop
(putStrLn $ "[sis] listening on port " ++ show (optPort opts))
(putStrLn $ "[sis] listening on 0.0.0.0:" ++ show (optPort opts))
Warp.defaultSettings
Warp.runSettings settings waiApp