From 7c13b4889870b3277d5076cea004ef22f22ae6c6 Mon Sep 17 00:00:00 2001
From: spaced4ndy <8711996+spaced4ndy@users.noreply.github.com>
Date: Fri, 5 Jan 2024 15:20:11 +0400
Subject: [PATCH] remove repeated folder

---
 src/Simplex/Chat.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Simplex/Chat.hs b/src/Simplex/Chat.hs
index 53cc17e386..3547664148 100644
--- a/src/Simplex/Chat.hs
+++ b/src/Simplex/Chat.hs
@@ -6151,7 +6151,7 @@ getCreateActiveUser st testView = do
               loop
             Left e -> putStrLn ("database error " <> show e) >> exitFailure
             Right user -> do
-              void . withTransaction st $ \db -> runExceptT $ createNoteFolder db user >> createNoteFolder db user
+              void . withTransaction st $ \db -> runExceptT $ createNoteFolder db user
               pure user
     selectUser :: [User] -> IO User
     selectUser [user@User {userId}] = do