From 6cf94262cfd44e01a8007d341b339ab6b2b583f8 Mon Sep 17 00:00:00 2001 From: spaced4ndy <8711996+spaced4ndy@users.noreply.github.com> Date: Fri, 18 Aug 2023 22:04:42 +0400 Subject: [PATCH] fix names --- tests/ChatTests/Groups.hs | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/tests/ChatTests/Groups.hs b/tests/ChatTests/Groups.hs index 447366cd05..31a21ad903 100644 --- a/tests/ChatTests/Groups.hs +++ b/tests/ChatTests/Groups.hs @@ -1722,8 +1722,8 @@ testGroupLink = alice ##> "/show link #team" alice <## "no group link, to create: /create link #team" -testGroupLinkRejoin :: HasCallStack => FilePath -> IO () -testGroupLinkRejoin = +testGroupLinkDeleteGroupRejoin :: HasCallStack => FilePath -> IO () +testGroupLinkDeleteGroupRejoin = testChat2 aliceProfile bobProfile $ \alice bob -> do alice ##> "/g team" @@ -1778,8 +1778,8 @@ testGroupLinkRejoin = bob #> "#team hi there" alice <# "#team bob> hi there" -testGroupLinkDeleteGroupRejoin :: HasCallStack => FilePath -> IO () -testGroupLinkDeleteGroupRejoin = +testGroupLinkRejoin :: HasCallStack => FilePath -> IO () +testGroupLinkRejoin = testChat2 aliceProfile bobProfile $ \alice bob -> do alice ##> "/g team"