rename feature

src/Simplex/Chat/Types/Preferences.hs

@@ -175,7 +175,7 @@ groupFeatureNameText = \case
   GFReactions -> "Message reactions"
   GFVoice -> "Voice messages"
   GFFiles -> "Files and media"
-  GFHistory -> "History"
+  GFHistory -> "Recent history"
 
 groupFeatureNameText' :: SGroupFeature f -> Text
 groupFeatureNameText' = groupFeatureNameText . toGroupFeature

tests/ChatTests/Groups.hs

@@ -1460,7 +1460,7 @@ testGroupDescription = testChat4 aliceProfile bobProfile cathProfile danProfile
       alice <## "Message reactions: on"
       alice <## "Voice messages: on"
       alice <## "Files and media: on"
-      alice <## "History: on"
+      alice <## "Recent history: on"
     bobAddedDan :: HasCallStack => TestCC -> IO ()
     bobAddedDan cc = do
       cc <## "#team: bob added dan (Daniel) to the group (connecting...)"
@@ -4261,16 +4261,16 @@ testGroupHistoryPreferenceOff =
 
       alice ##> "/set history #team off"
       alice <## "updated group preferences:"
-      alice <## "History: off"
+      alice <## "Recent history: off"
       concurrentlyN_
         [ do
             bob <## "alice updated group #team:"
             bob <## "updated group preferences:"
-            bob <## "History: off",
+            bob <## "Recent history: off",
           do
             cath <## "alice updated group #team:"
             cath <## "updated group preferences:"
-            cath <## "History: off"
+            cath <## "Recent history: off"
         ]
 
       connectUsers alice dan

tests/ChatTests/Utils.hs

@@ -222,7 +222,7 @@ groupFeatures'' =
     ((0, "Message reactions: on"), Nothing, Nothing),
     ((0, "Voice messages: on"), Nothing, Nothing),
     ((0, "Files and media: on"), Nothing, Nothing),
-    ((0, "History: on"), Nothing, Nothing)
+    ((0, "Recent history: on"), Nothing, Nothing)
   ]
 
 itemId :: Int -> String