From d126fcf3758396ff6d1ddf413183468aae03f6cc Mon Sep 17 00:00:00 2001
From: voidlizard <dzuikov@gmail.com>
Date: Sat, 1 Feb 2025 12:48:11 +0300
Subject: [PATCH] wip

---
 hbs2-git3/app/GitRemoteHelper.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/hbs2-git3/app/GitRemoteHelper.hs b/hbs2-git3/app/GitRemoteHelper.hs
index e1095f35..4f256642 100644
--- a/hbs2-git3/app/GitRemoteHelper.hs
+++ b/hbs2-git3/app/GitRemoteHelper.hs
@@ -159,8 +159,8 @@ main =  flip runContT pure do
       pause @'Seconds 0.05
 
   ContT $ bracket none $ const do
-    -- IO.hPutStr origHandle (replicate 100 ' ')
-    -- IO.hPutStr origHandle "\rdone\n"
+    IO.hPutStr origHandle (replicate 100 ' ')
+    IO.hPutStr origHandle "\r"
     silence
 
   lift $ void $ installHandler sigPIPE Ignore Nothing