1
0
Fork 0

Fix status script start state

This commit is contained in:
Malte 2023-01-04 11:31:01 +01:00
parent e45fe313ab
commit 7994d26291

View file

@ -93,7 +93,7 @@ simpleModule delay action var = repeatM do
main :: IO ()
main = do
mode_var <- newVar Orga
mode_var <- newVar Unrestricted
let read_mode = readTVarIO (value mode_var)
modules =
[ simpleModule (5 * oneSecond) $ do