aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJacques Comeaux <jacquesrcomeaux@gmail.com>2022-06-01 17:41:44 -0500
committerJacques Comeaux <jacquesrcomeaux@gmail.com>2022-06-01 17:41:44 -0500
commita2111ffa6e530e054c377d9538b8b066f218de29 (patch)
treedad4f9ccd22bc9f8710f46d75a3d52b9d039e39d
parentff147c66282273833407b4be0af4cfce143a7903 (diff)
Move group
-rw-r--r--src/Tomato/App.hs2
-rw-r--r--src/Tomato/Validate.hs2
2 files changed, 2 insertions, 2 deletions
diff --git a/src/Tomato/App.hs b/src/Tomato/App.hs
index 14bf61a..64168a7 100644
--- a/src/Tomato/App.hs
+++ b/src/Tomato/App.hs
@@ -25,7 +25,7 @@ runApp inner = do
let app = App
{ appLogFunc = logFunc
, appToken = "t2YhlxxwZmn2cWfkAomjMc6BgVPMaC5NRkqHzGQl"
- , appBotId = "713bcb4a4604006c944804552c"
+ , appBotId = "073b2ab07990ce95d7442a9d06"
, appFile = "tomato.png"
, appClientId = "FbzqI-oR7277JwL1ZGsyUw7yG1F5U0U3WhQ3kOW71Do"
}
diff --git a/src/Tomato/Validate.hs b/src/Tomato/Validate.hs
index fe0d82a..f95601d 100644
--- a/src/Tomato/Validate.hs
+++ b/src/Tomato/Validate.hs
@@ -11,7 +11,7 @@ import Tomato.Data.Message (InMessage (..))
isTomato :: InMessage -> Bool
isTomato m =
not (hasAttach m) &&
- groupId m == "87220147" &&
+ groupId m == "61875176" &&
isUser m &&
text m == "tomato"