restoring order of events

fsharplang-ru · Nov 30, 2023 · 50e27b5 · 50e27b5
1 parent d85c83a
commit 50e27b5
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/VahterBanBot/Bot.fs b/src/VahterBanBot/Bot.fs
@@ -233,9 +233,10 @@ let onUpdate
     else
 
     // upserting user to DB
-    let upsertUserTask =
+    let! _ =
         DbUser.newUser message.From
         |> DB.upsertUser
+        |> taskIgnore
 
     // check if message comes from channel, we should delete it immediately
     if botConfig.ShouldDeleteChannelMessages && isChannelMessage message then
@@ -276,5 +277,4 @@ let onUpdate
             |> DbMessage.newMessage
             |> DB.insertMessage
             |> taskIgnore
-    do! taskIgnore upsertUserTask 
 }