summaryrefslogtreecommitdiff
path: root/main
diff options
context:
space:
mode:
authorRoman Smrž <roman.smrz@seznam.cz>2026-08-29 10:03:37 +0200
committerRoman Smrž <roman.smrz@seznam.cz>2026-08-29 10:03:37 +0200
commitded08b19077fb8b36ff3e3aba30cd3b1fda1e87b (patch)
treed8008c769f9957e1eb0870a120e2e8c33eb8ad1c /main
parent5571af3097b02394f5ec77214be8092ee99e04e9 (diff)
Fix dm-bot-echo sending deplicate replyHEADmaster
Diffstat (limited to 'main')
-rw-r--r--main/Main.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/main/Main.hs b/main/Main.hs
index 5d5df63..04ced9c 100644
--- a/main/Main.hs
+++ b/main/Main.hs
@@ -449,7 +449,7 @@ interactiveLoop st opts = withTerminal commandCompletion $ \term -> do
case optDmBotEcho opts of
Just prefix
- | not (msgFrom msg `sameIdentity` self)
+ | new && not (msgFrom msg `sameIdentity` self)
-> do
void $ forkIO $ do
res <- runExceptT $ flip runReaderT erebosHead $ sendDirectMessage (msgFrom msg) (prefix <> msgText msg)