remove repeated folder

2024-01-05 15:20:11 +04:00 · 2024-01-05 15:20:11 +04:00 · 7c13b48898
commit 7c13b48898
parent 363856b0ff
1 changed files with 1 additions and 1 deletions
--- 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