diff options
| author | Roman Smrž <roman.smrz@seznam.cz> | 2020-01-19 21:36:40 +0100 |
|---|---|---|
| committer | Roman Smrž <roman.smrz@seznam.cz> | 2020-01-19 21:36:40 +0100 |
| commit | a0c6c341ba1629a1c1070edf69855c745c6bd7eb (patch) | |
| tree | ba5000382f7f7a905c4011d991fb286ef7abfda5 /src/Main.hs | |
| parent | 25324026a1033c43652a058f966dfb3d255102ae (diff) | |
Synchronization service
Diffstat (limited to 'src/Main.hs')
| -rw-r--r-- | src/Main.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Main.hs b/src/Main.hs index e23e1b5..696b896 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -34,6 +34,7 @@ import Service import State import Storage import Storage.List +import Sync main :: IO () main = do @@ -96,6 +97,7 @@ interactiveLoop st bhost = runInputT defaultSettings $ do erebosHead <- loadLocalStateHead st startServer erebosHead extPrintLn bhost [ SomeService @AttachService Proxy + , SomeService @SyncService Proxy , SomeService @DirectMessageService Proxy ] |