summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRoman Smrž <roman.smrz@seznam.cz>2025-08-03 12:35:16 +0200
committerRoman Smrž <roman.smrz@seznam.cz>2025-08-03 12:35:16 +0200
commit423787ac55280c0047350c2e684f0dd0a3042d08 (patch)
tree907b919f2d0cb72831265b857ff891d2bfa3a9b1
parentf05e96ac2b9c38463fba8712d8b13844e03cd191 (diff)
Remove unused icePeer from command state
-rw-r--r--main/Main.hs2
1 files changed, 0 insertions, 2 deletions
diff --git a/main/Main.hs b/main/Main.hs
index 3bfeb5f..a3c485b 100644
--- a/main/Main.hs
+++ b/main/Main.hs
@@ -457,7 +457,6 @@ interactiveLoop st opts = withTerminal commandCompletion $ \term -> do
loop $ Just $ CommandState
{ csHead = erebosHead
, csContext = NoContext
- , csIcePeer = Nothing
, csWatchChatrooms = watched
, csQuit = False
}
@@ -479,7 +478,6 @@ data CommandInput = CommandInput
data CommandState = CommandState
{ csHead :: Head LocalState
, csContext :: CommandContext
- , csIcePeer :: Maybe Peer
, csWatchChatrooms :: Maybe WatchedHead
, csQuit :: Bool
}