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:
voidlizard 2025-02-01 12:48:11 +03:00
parent 73b6c969bd
commit d126fcf375
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
hbs2-git3/app/GitRemoteHelper.hs
View File

@ -159,8 +159,8 @@ main = flip runContT pure do
pause @'Seconds 0.05 pause @'Seconds 0.05
ContT $ bracket none $ const do ContT $ bracket none $ const do
-- IO.hPutStr origHandle (replicate 100 ' ') IO.hPutStr origHandle (replicate 100 ' ')
-- IO.hPutStr origHandle "\rdone\n" IO.hPutStr origHandle "\r"
silence silence
lift $ void $ installHandler sigPIPE Ignore Nothing lift $ void $ installHandler sigPIPE Ignore Nothing