diff --git a/src/Simplex/Chat.hs b/src/Simplex/Chat.hs index 4a6a008b6f..497b3b2549 100644 --- a/src/Simplex/Chat.hs +++ b/src/Simplex/Chat.hs @@ -3871,7 +3871,7 @@ chatCommandP = "/users" $> ListUsers, "/_user " *> (APISetActiveUser <$> A.decimal), ("/user " <|> "/u ") *> (SetActiveUser <$> displayName), - "/_delete user " *> (APIDeleteUser <$> A.decimal <* " delSMPQueues=" <*> onOffP), + "/_delete user " *> (APIDeleteUser <$> A.decimal <* " del_smp=" <*> onOffP), "/delete user " *> (DeleteUser <$> displayName <*> pure True), ("/user" <|> "/u") $> ShowActiveUser, "/_start subscribe=" *> (StartChat <$> onOffP <* " expire=" <*> onOffP), diff --git a/tests/ChatTests.hs b/tests/ChatTests.hs index 55ce82849b..bb13882130 100644 --- a/tests/ChatTests.hs +++ b/tests/ChatTests.hs @@ -4587,7 +4587,7 @@ testDeleteUser = -- cannot delete active user - alice ##> "/_delete user 1 delSMPQueues=off" + alice ##> "/_delete user 1 del_smp=off" alice <## "cannot delete active user" -- delete user without deleting SMP queues @@ -4601,7 +4601,7 @@ testDeleteUser = alice <## "alice (Alice)" alice <## "alisa (active)" - alice ##> "/_delete user 1 delSMPQueues=off" + alice ##> "/_delete user 1 del_smp=off" alice <## "ok" alice ##> "/users"