dandri/simplex-chat
1
0
Fork 0
mirror of https://github.com/simplex-chat/simplex-chat.git synced 2026-10-20 18:53:28 +00:00
Code Issues Packages Projects Releases Wiki Activity

diff cosmetics

Browse Source
This commit is contained in:
Alain Brenzikofer
2026-09-29 08:13:30 +02:00
parent 38b79929ca
commit 7cb651d207
6 changed files with 10 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Simplex/Chat/Controller.hs
+4 -3
View File
@@ -709,18 +709,19 @@ data ChatCommand
deriving (Show)
data PlanResolveMode
= PRMUnknown -- only resolve if chat is unknown (default)
= PRMAll -- always resolve, also known chats
| PRMUnknown -- only resolve if chat is unknown (default)
| PRMNever -- do not resolve links and names, only do local search
| PRMAll -- always resolve, also known chats
deriving (Eq, Show)
planResolveModeP :: A.Parser PlanResolveMode
planResolveModeP =
A.takeTill (== ' ') >>= \case
"all" -> pure PRMAll
"on" -> pure PRMAll
"unknown" -> pure PRMUnknown
"off" -> pure PRMUnknown
"never" -> pure PRMNever
"all" -> pure PRMAll
_ -> fail "bad PlanResolveMode"
data CommandSource