diff options
| author | stuebinm | 2022-08-14 19:30:44 +0200 |
|---|---|---|
| committer | stuebinm | 2022-08-14 19:30:44 +0200 |
| commit | ddbbd02dc816c076faaa9141b3aa4853da83749f (patch) | |
| tree | 2a20abdfac9577feedb522bd77ef6e8a10e5a0f4 /lib/Server.hs | |
| parent | ce14bc010a8f97cd3bab6f5cbd998f614b811546 (diff) | |
control room: translations & form input
still basic, but works pretty well overall
Diffstat (limited to 'lib/Server.hs')
| -rw-r--r-- | lib/Server.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Server.hs b/lib/Server.hs index 24f29f9..f7ee81b 100644 --- a/lib/Server.hs +++ b/lib/Server.hs @@ -47,9 +47,9 @@ import Persist import Server.ControlRoom import Server.GTFS_RT (gtfsRealtimeServer) import Server.Util (Service, ServiceM, runService) -import Yesod (toWaiAppPlain) +import Yesod (toWaiAppPlain) -import System.IO.Unsafe +import System.IO.Unsafe application :: GTFS -> Pool SqlBackend -> IO Application application gtfs dbpool = do |