voidlizard
/
hbs2
mirror of https://github.com/voidlizard/hbs2
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

wip

This commit is contained in:
Dmitry Zuikov 2023-01-28 10:07:23 +03:00
parent 75d34f18d7
commit 30ac04d0a6
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
hbs2-storage-simple/lib/HBS2/Storage/Simple.hs
View File

@ -153,7 +153,7 @@ simpleStorageWorker ss = do
Just a -> a >> next Just a -> a >> next
killer <- async $ forever $ do killer <- async $ forever $ do
pause ( 30 :: Timeout 'Seconds ) -- FIXME: setting pause ( 20 :: Timeout 'Seconds ) -- FIXME: setting
atomically $ do atomically $ do